具体操作步骤如下:
一、打开VB软件,在窗体上面添加一个列表框,如下图所示。
二、单击列表框,在属性窗口中,设置列表框的属性和内容,如下图所示。
三、在窗体上面,添加一个命令按钮,如下图所示。
四、设置,一个命令按钮的属性,名称别为“清除”,如下图所示。
五、双击“清除”命令按钮,编辑其代码,如下图所示。
六、运行程序,验证结果。选择“政治”,点击“清除”命令按钮。
七、则列表框中“政治”项目消失。如下图所示。
VB可对图片框的Picture属性使用LoadPicture 函数来实现清除里面的所有内容。
PictureBox 控件
PictureBox 控件可以显示来自位图、图标或者元文件,以及来自增强的元文件、JPEG 或 GIF
文件的图形。如果控件不足以显示整幅图象,则裁剪图象以适应控件的大小。
Picture 属性
返回或设置控件中要显示的图片。对于 OLE 容器控件,在设计时不可用在运行时为只读。
LoadPicture 函数
将图形载入到窗体的 Picture 属性、PictureBox 控件或 Image 控件。
Cls 方法
清除运行时 Form 或 PictureBox 所生成的图形和文本。
以下代码体现上述各知识点的应用:
Private Sub Command1_Click()
Picture1.Picture = LoadPicture("") ' 可删除图片框所有内容
End Sub
Private Sub Command2_Click()
Picture1.Cls '只能清除绘制的图
End Sub
Private Sub Form_Load()
Picture1.Picture = LoadPicture("C:\Sunset.jpg")
Picture1.ForeColor = QBColor(15)
Picture1.Print Now
End Sub
Picture1.Cls
Picture1.Picture = LoadPicture("")
Picture1.Picture = LoadPicture("")
Picture1.Cls
Picture1.Cls