程序里边有一个form,上面有10个textbox和几个按钮。希望实现的效果是:用户进入界面的时候,textbox隐藏,点击某个特定按钮,显示某几个textbox。我是这样做的,在Load里边,把text1.visible=false,text2.visible=false.....然后在按钮的click里边,再把text1.visible=true.....请问有没有一种比较简单的方法,可以批量处理这一事件?自己写一个函数?还是怎么做?如果界面上面有100个textbox,那把它们的visible属性一个一个设成false就是很大一段程序了……
for iloop=0 to 99
textbox(iloop).visible=false
next iloop
在按钮的click里边写
For i = 0 To Me.Text1.Count - 1
Me.Text1(i).visible = False
Next
COPY,然后粘贴
系统会提示是否建立数组.选是
就建立控件数组了.
Private Sub Form_Load()
Dim i As Integer
For i = 0 To Text1.Count - 1
Text1(i).visible = False
Next
End Sub