• vb 如何将子程序的值传递出来
• vb调用程序参数传递
• 一题目求解...关于VB子程序编写及参数传递问题
• VB中怎么调用"子程序"?

vb 如何将子程序的值传递出来

VB的子程序的参数,分两种:

用关键字Byval 声明的是传值参数

用关键字ByRef 声明的是传址参数

例如子程序 aaaa:

sub aaaa(Vyval a as integer,byref b as integer)

a=99

b=100

End sub

现在去调用它如下:

Dim x as integer,y as integer

x=1

y=2

Print x,y

aaaa x,y

Print x,y

可以,看到两次输出的结果x相同,y不同

y把子程序的结果传递出来了

当然,编写函数可以把结果传递出来,但是函数名只可以传递一个结果,而利用ByRef可以传递多个结果.

vb调用程序参数传递

例如

主程序

sub main()

x=1

call sub1(x,y)

call sub2(y,z)

msgbox z

end sub

sub sub1(a,b)

b=a+100

end sub

sub sub2(c,d)

d=c*C

end sub

一题目求解...关于VB子程序编写及参数传递问题

只需改两个地方就OK了！

Sub ProcMin(a(), amin) '参数改为a%(),需指明数组类型，与实参对应

Dim amin% '删除此句，形参不能再定义

效果图如下：呵，你自己验证吧！

VB中怎么调用"子程序"?

call Command1_Click()

第二行改成这样就可以了