vb.net清除部分图像 vb清除命令

vb中图片框如何清除里面的所有内容？

具体操作步骤如下：

成都创新互联公司成立与2013年，是专业互联网技术服务公司，拥有项目成都做网站、成都网站制作网站策划，项目实施与项目整合能力。我们以让每一个梦想脱颖而出为使命，1280元单县做网站,已为上家服务,为单县各地企业和个人服务,联系电话:13518219792

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

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

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

四、设置，一个命令按钮的属性，名称别为“清除”，如下图所示。

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

六、运行程序，验证结果。选择“政治”，点击“清除”命令按钮。

七、则列表框中“政治”项目消失。如下图所示。

怎么设置VB清除按钮，清除PictureBox里的图片

可在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

如何使用VB.NET制作一个软件，在固定文件夹中定时删除某些图片，

Imports System.IO

Imports System.IO.Directory

' ======================================================

' 实现一个静态方法将指定文件夹下面的所有内容del

' 如果目标文件夹为只读属性就会报错。

' ======================================================

Public Shared Sub DelDir(ByVal srcPath As String, ByVal aimPath As String)

Try

' 检查目标目录是否以目录分割字符\结束,如果不是则添加之

If aimPath(aimPath.Length - 1)  Path.DirectorySeparatorChar Then

aimPath += Path.DirectorySeparatorChar

End If

'判断源目录是否存在,不存在则退出.

If (Not Directory.Exists(srcPath)) Then Exit Sub

' 判断目标目录是否存在如果不存在则新建之

If (Not Directory.Exists(aimPath)) Then Directory.CreateDirectory(aimPath)

' 得到源目录的文件列表，该里面是包含文件以及目录路径的一个数组

Dim fileList() As String = Directory.GetFileSystemEntries(srcPath)

' 遍历所有的文件和目录

For Each FileName As String In fileList

' 先当作目录处理如果存在这个目录就递归Copy该目录下面的文件

If Directory.Exists(FileName) Then

' 直接Delete文件

File.Delete(aimPath + Path.GetFileName(FileName))

end if

Next

Catch ex As Exception

MessageBox.Show(ex.ToString())

End Try

End Sub

然后你定义一个timer设定循环时间，时间到则调用这个即可

用vb.net代码如何实现清空picturebox控件所加载的图片？

双击button，在代码窗中写入下面这句话：

this.pictureBox1.Image = null

就可以实现你说的功能啦