VB中如何将多个textbox设置为空
假设我有20*4个文本框控件,怎么利用程序将其设置为空?不要一个一个的弄,做好能将其与一个数组相结合?
另外,怎么把这些文本框控件里的值赋给一个二维数组?
谢谢了!
[解决办法]
使用控件数组
For intP=0 to 79
TextBox(intP).Text=""
Next intP
关于赋值,假使你定义了一个二维数组:A(0 to 7,0 to 9)
那么:
for intP= 0 to 79
i=intP\ 10
j=intP mod 10
A(i,j)=textbox(intP)
next intP
[解决办法]
- VB code
Dim Ctrl As Control For Each Ctrl In Me.Controls If Left(Ctrl.Name, 3) = "txt" Then Ctrl.Text = "" End If Next
[解决办法]
使用控件数组
For intP=0 to 79
TextBox(intP).Text=""
Next intP
[解决办法]
楼上都对.
有控件数组用一楼.
没有用控件数组用二楼.