vb.net删除图片,vb删除图片代码

vb.net怎么强制删除文件

先杀进程再删除文件

创新互联公司-专业网站定制、快速模板网站建设、高性价比麻江网站开发、企业建站全套包干低至880元,成熟完善的模板库,直接使用。一站式麻江网站制作公司更省心,省钱,快速模板网站建设找我们，业务覆盖麻江地区。费用合理售后完善，十载实体公司更值得信赖。

Visual Basic code

//杀进程代码

Private Sub KillProcess(ByVal processName As String)

Dim myproc As System.Diagnostics.Process = New System.Diagnostics.Process

Try

For Each thisproc As Process In Process.GetProcessesByName(processName)

If (Not thisproc.CloseMainWindow()) Then

thisproc.Kill()

End If

Catch

End Try

End Sub

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

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

this.pictureBox1.Image = null

就可以实现你说的功能啦

当前文章：vb.net删除图片,vb删除图片代码
网页URL：http://azwzsj.com/article/dscsjpc.html