vb6.0中如何在不同的窗体事件中实现按值传递参数?

来源:百度知道 编辑:UC知道 时间:2024/05/21 14:35:59
我在form1中生成了两个随机数字a,b
这两个值我需要按值传递到form2中。
我想使用public sub1(byval m as integer,byval n as integer)
但是vb不让我这样定义!!!
我该怎样将a,b 的值传过去????

全局变量会使程序速度变慢 这样办:
form2:dim a as integer,b as integer

以上为form2的定义
办法1:
form2:
sub getNumber(numa as integer,numb as integer)
a=numa
b=numb
end sub

form1里面调用:form2.getnumber a,b 即可 a为数字a b为数字b

方法2(同样是在form2里面这样定义)form2:dim a as integer,b as integer
form1:
form2.a = a
form2.b = b
a为随即数字a,b为随即数字B

方法3:form1:
public a as integer,b as integer

form1里面直接用a = int(rnd*??)+1:b = int(rnd*??)+1
form2里面也可以直接用:msgbox a & " " & b

因为public是公共的 所以form2里面的a,b实际上是form1的

有个文件存放全局变量的,你找下嘛,N久没用VB了,又没装VB,不能帮你找了