'Clear All the TextBox
Public Sub ClearTextBoxse()
Dim mycontrol As Control
Dim i As Integer
For i = 0 To Controls.Count - 1
mycontrol = Controls(i)
If (TypeOf mycontrol Is TextBox) Then
mycontrol.Text = ""
End If
Next
End Sub
posted on 2007-06-19 17:15
疾风随影 阅读(749)
评论(2) 编辑 收藏 引用 所属分类:
VB2005 column