关于过程的定义

[lndlwwh830]

请问如何在过程中定义引用数组

如下:

Sub text(t As TextBox)


t.text = "ddfd"



End Sub

上面是正常定义方法:


可是如果t 是一个数组(text1(i).text)


那该如何定义呢？？

[Mister]

可以直接传对象名啊...
在窗体上画一个 TextBox 控件 Name 是 Text1 ，Index 是 0 代码如下：

Private Sub Form_Load()

Call Demo_ObjText(Text1)

End Sub

Sub Demo_ObjText(ObjText As Object)

ObjText(0).Text = "Hi"

Load ObjText(1)

ObjText(1).Top = ObjText(0).Top + 500 '避免 Text(1) 和 Text(0) 重叠。
ObjText(1).Text = "Hello"
ObjText(1).Visible = True

End Sub

[lndlwwh830]

谢谢二位的回答

[bbgbianbaogui]

将其改成
Sub text(t（） As TextBox)
......
End Sub