Question

vb 怎样在点击text控件后让里面的数据清空

Answer 1

　　　以前曾编写过一些小程序，有时需要将Form中所有的TextBox内容清空，而Form里的TextBox又特别多，这时最让人头疼了，一条一条语句的写：
　　TextBoxName.Text=""
　　如果有十几个TextBox的话...(哇，我的命真苦啊)后来想到用控件数组，虽然语句少了，仅需：
　　For i=1 to n
　　TextBoxArray(i).Text=""
　　Next
　　可是每一个TextBox的Name都一样，反而降低

Answer 2

　　　　以前曾编写过一些小程序，有时需要将Form中所有的TextBox内容清空，而Form里的TextBox又特别多，这时最让人头疼了，一条一条语句的写：
　　TextBoxName.Text=""
　　如果有十几个TextBox的话...(哇，我的命真苦啊)后来想到用控件数组，虽然语句少了，仅需：
　　For i=1 to n
　　TextBoxArray(i).Text=""
　　Next
　　可是每一个TextBox的Name都一样，反而降低了程序的编程质量和可读性。难到真的没法子即使语句短小精悍，又保持程序的可读性吗？
　　当我们学到对象的应用后，茅塞顿开，和不利用对象所属的类的属性来实现呢？

　　Public Sub ClearAllTextBox(frm As Form)

　　Dim ctl As Object

　　For Each ctl In frm

　　if TypeOf ctl Is TextBox Then

　　ctl.Text=""

　　end if

　　Next

　　End Sub

　　哈哈，轻松搞定，就这么简单！
　　希望能帮到你学习！谢谢