vb.net – 检查特定图像名称的Picturebox

发布时间：2020-12-17 07:16:06 所属栏目：百科来源：网络整理

导读：我需要检查一个特定图像的图片框.我知道你可以查看图片框是否填充了图片…… If Not pictureBox.Image is Nothing ThenElseEnd If 但在我的情况下,我需要检查这个图片框,看看我在此过程中加载的图像. 这是我用于加载图像的当前代码… PictureBox1.Image = My

我需要检查一个特定图像的图片框.我知道你可以查看图片框是否填充了图片……

If Not pictureBox.Image is Nothing Then

Else

End If

但在我的情况下,我需要检查这个图片框,看看我在此过程中加载的图像.

这是我用于加载图像的当前代码…

PictureBox1.Image = My.Resources.TestImage1

我想通过使用以下代码我可以检查图像名称,但这显然不起作用.

If PictureBox1.Image = My.Resources.TestImage1 Then
  'do something
Else
  'do something else
End if

建议？

解决方法

图像不知道文件名或从中加载的任何其他名称.但是,您可以做的是逐个像素地比较图像.试试这段代码：

Public Function AreSameImage(ByVal I1 As Image,ByVal I2 As Image) As Boolean
  Dim BM1 As Bitmap = I1
  Dim BM2 As Bitmap = I2
  For X = 0 To BM1.Width - 1
    For y = 0 To BM2.Height - 1
      If BM1.GetPixel(X,y) <> BM2.GetPixel(X,y) Then
        Return False
      End If
    Next
  Next
  Return True
End Function

信用额度为here.

我在寻找这个答案时发现了一篇有用的文章：

> Compare two images to find differences greater than a threshold value in VB .NET

这是你如何检查你的图像是否小于100％,即相似.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!