vb如何加一个清除文本框内容的按钮

具体操作步骤如下：

1、首先，在窗口中添加一个文本框，如下图所示，然后进入下一步。

2、其次，单击文本框，在属性窗口中设置文本框的属性，清除文本，如下图所示，然后进入下一步。

3、接着，将文本框的enabled属性设置为False，如下图所示，然后进入下一步。

4、然后，在表单上添加一个命令按钮，如下图所示，然后进入下一步。

5、随后，在“属性”窗口中，将命令按钮的“标题”属性设置为“允许输入”，如下图所示，然后进入下一步。

6、接着，双击命令按钮以编辑其代码，如下图所示，然后进入下一步。

7、最后，运行程序，输入“百度”。此时不能直接在文本框中输入内容。 单击“允许输入”命令按钮就可以输入相应的内容了，如下图所示。这样，问题就解决了。

添加一个按钮Command1，代码(以清除Text1文本框内容为例)：

Private Sub Command1_Click()
Text1 = ""
End Sub

点击后， Text1文本框内容就清除了。

command1_click()事件里添加text1.text=""如果文本框多的话建议用数组写个循环就OK

Private Sub Command1_Click()
text1 = "" ’文本框等于空 就等于清空文本框
End Sub
“请对代码做文字说明” 日。。了。。狗。。了。这么简单的代码，百度还建议我文字说明！！艹。。。。。。。。。。

加个按钮其单击过程：
TextBox1.Text = ""

如果是 6.0，把文本框加入到一个控件数组里，其名称为 TextBox1(I)，则
For I = 0 to 5
TextBox(I).Text = ""
Next