全局变量会使程序速度变慢 这样办:
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的