Try
If PictureBox1.Image.ToString <> "" Then
Label1.Text = "有图像"
End If
Catch ex As Exception
Label1.Text = "无图像"
End Try
VB.Net 用代码为picturebox 打开一张图片:
Dim fn As String = "D:\test.jpg"
'方法1
Me.PictureBox1.ImageLocation = fn
'方法2
Me.PictureBox1.Image = Image.FromFile(fn)
可以使用picturebox1.image.tostring是否为空来判断