关于过程的定义

Question

请问如何在过程中定义引用数组
 
如下:
 
   Sub text(t As TextBox)
   
   
   t.text = "ddfd"
   
   
   
   End Sub
  
上面是正常定义方法:
  
  
   可是如果t 是一个数组(text1(i).text)
   
   
   那该如何定义呢？？

Answer 1

可以直接传对象名啊...
在窗体上画一个 TextBox 控件 Name 是 Text1 ，Index 是 0 代码如下：Private Sub Form_Load()   Call Demo_ObjText(Text1) 
   
End SubSub 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

Answer 2

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