继续菜鸟问题 新窗体 数组

Question

窗体a 有一个动态数组数组的成员数目不固定现在需要在窗体B当中使用这个数组。怎么办？有同志讲可以用对象属性解决，求具体方法谢谢

Answer 1

如果动态数组是public的，在b窗体字节调用就行了。如果是private的，那可以写个函数来实现调用。

Answer 2

调用前可以确定数目在VB6当中不能把数组定义成public至于函数？能具体一点么？

Answer 3

可以使用 form1.ubound获取数组的个数

Answer 4

然后直接调用就可以了
比如 form1(1).show

Answer 5

你可以添加一模組
再把动态数组在模組中定义成Public
如：
添加一Module1.bas
在其中定底动态數組
public tmp() as string 
这样在窗口B直接调用就可以

Answer 6

函数法：
FormA中：
Dim tmp() As StringPrivate Sub Command1_Click()
  ReDim tmp(10) As String
  Dim i As Integer, j As Integer
  For i = 0 To 10
      tmp(i) = "TEST" & i
  Next
  Dim frm As New FormA
  Call frm.GetSS(10, tmp())
  frm.Show
End SubFormB中：
Dim ddd() As String
Dim jjj As IntegerPublic Sub GetSS(iii As Integer, tmp() As String)
  Dim i As Integer
  ReDim ddd(iii) As String
  jjj = iii
  
  For i = 0 To iii
      ddd(i) = tmp(i)
  Next
End SubPrivate Sub Command1_Click()
  Dim i As Integer
  For i = 0 To jjj
      Debug.Print ddd(i)
  Next
End Sub

Answer 7

可能是我看错了
汗一个
呵呵
窗体内的数组
你可以定义数组为public的
在模块里定义就可以了