Question

VB 2个FORM间的数据传输

FORM A中 有一个不定的一维数组 里面的数据需要传到FORM B 如何处理
Public rowarr(1 TO 20000) As String 我换定数组了 这样也不行

Answer 1

public function func(a as integer, b as integer) as integer
..................
end function
'in form1
'-----
sub subname()
value=form1.func(a,b)
end sub
'in form2
写个成员函数不久行了

Answer 2

定义 数组 为 public型的。将其写在模块里面就可以了

Answer 3

重定义不定数组应用“REDIM”，所以，你用PUBLIC写了两个声明，不合法的。