vb清除所有文本框内容 vb中全部清空文本框

If Chr(KeyCode) = ＂D＂ Then Text1.Text = InputBox(＂请输入要删除的项目＂) For i = 0 To i If List1.List(i) = Text1.Text Then List1.RemoveItem(i) End If Next i End If 试下这个

添加一个按钮Command1,代码(以清除Text1文本框内容为例):Private Sub Command1_Click() Text1 = ＂＂ End Sub点击后, Text1文本框内容就清除了.

这个很简单啊:单击'删除'事件代码里写上,text1.text='' text2.text='' 不就自动就空了.

RichTextBox1控件的内容是存在TEXT这个属性中的,修改这个属性就可以了.

Controls(＂Text＂ & i).Item(j).Text = ＂＂

Private Sub List1_Click() List1.RemoveItem List1.ListIndex End Sub

1、首先,打开VB软件,在窗体上面添加一个列表框,如下图所示.2、单击列表框,在属性窗口中,设置列表框的属性和内容,如下图所示.3、在窗体上面,添加两个命令按钮,如下图所示.4、分别设置,两个命令按钮的属性,名称分别为“复制”,“清除”,如下图所示.5、双击“清除”命令按钮,编辑其代码,如下图所示.6、运行程序,验证结果.选中列表框中的“语文”,点击“复制”命令按钮,则在列表框中,复制了“语文”项目;再选择“政治”,点击“清除”命令按钮,则列表框中“政治”项目消失.如下图所示.

cls方法如form1.clspicture1.cls

如果是清楚画的东西就用cls,如果是要让控件都不见就这样:For Each i In Me.Controls i.Visible = False Next

combo1.clear