vb列表框内容添加和删除

1、首先，打开VB软件，在窗体上面添加一个列表框，如下图所示。

2、单击列表框，在属性窗口中，设置列表框的属性和内容，如下图所示。

3、在窗体上面，添加两个命令按钮，如下图所示。

4、分别设置，两个命令按钮的属性，名称分别为“复制”，“清除”，如下图所示。

5、双击“清除”命令按钮，编辑其代码，如下图所示。

6、运行程序，验证结果。选中列表框中的“语文”，点击“复制”命令按钮，则在列表框中，复制了“语文”项目；再选择“政治”，点击“清除”命令按钮，则列表框中“政治”项目消失。如下图所示。

在VB中怎样用按钮清除文本框中的文本的方法。

如下参考：

1.首先，在表单中添加一个文本框。

2.单击文本框，在“属性”窗口中设置文本框的属性，然后清空文本内容。

3.将文本框的启用属性设置为False。

4.在窗口主体上添加一个命令按钮，如下图所示。

5.在属性窗口中，将命令按钮的标题属性设置为“允许进入”。

6.双击command按钮编辑代码，如下图所示。

7.运行程序并输入“百度”。直接在文本框中无法输入内容，点击“允许输入”命令按钮，即可输入相应的内容。

可在VB的按钮事件中可对PictureBox图片框控件属性Picture赋值 LoadPicture()，清除装载在PictureBox图片框内的图片。

LoadPicture 函数，将图形载入到窗体的 Picture 属性、PictureBox 控件或 Image 控件。

VB语言中LoadPicture函数用法示例：

本例使用 LoadPicture 函数将图片加载到窗体的 PictureBox 控件并从控件上清除掉该图片。要试用此例，将 PictureBox 控件添加入 Form 对象，然后将以下代码粘贴到 Form 

的声明部分，然后运行此例，单击 Form 。

Private Sub Form_Click()

    Dim Msg As String   ' 声明变量。

    On Error Resume Next   ' 设置错误句柄。

    Height = 3990

    Width = 4890   ' 设置高度和宽度。

    Picture1.Picture = LoadPicture("C:\Windows\Web\Wallpaper\Windows\img0.jpg", vbLPCustom, vbLPColor, 32, 32)

    If Err Then

        Msg = "Couldn't find the .cur file."

        MsgBox Msg   ' 显示错误消息。

        Exit Sub   ' 如果发生错误则退出。

    End If

    Msg = "Choose OK to clear the bitmap from the form."

    MsgBox Msg

    Picture1.Picture = LoadPicture()   '清除 picturebox。

End Sub

---