在vb编程中如何用语句判断点击的图片是给定的图片

 我来答
源魔云10
2010-11-27 · TA获得超过1829个赞
知道小有建树答主
回答量:706
采纳率:0%
帮助的人:261万
展开全部
靠 楼上的枪手 老子碰你好多次了
这个用遍历的算法做,这是我一个程序上面的,我只是截取下来的,可能还要做些兼容的工作

On Error GoTo Err:

Dim PathIndex(256) As Integer
Dim PIIndex As Integer

Dir.Path = "C:\"
PIIndex = 1
For b = 1 To 255
PathIndex(b) = 0
Next b

Returns:
SearchingNow.Caption = AddL(Dir.Path, "\")
If Paused Then
SearchingNow.Caption = ""
Exit Sub
End If
SearchDir
DoEvents

Reback:
If PathIndex(PIIndex) <= Dir.ListCount - 1 Then
Dir.Path = Dir.List(PathIndex(PIIndex))
PIIndex = PIIndex + 1
PathIndex(PIIndex) = 0
GoTo Returns
Else
If Dir.Path <> GoBack(Dir.Path) Then
Dir.Path = GoBack(Dir.Path)
PIIndex = PIIndex - 1
PathIndex(PIIndex) = PathIndex(PIIndex) + 1
If PathIndex(PIIndex) > Dir.ListCount - 1 Then GoTo Reback
Dir.Path = Dir.List(PathIndex(PIIndex))
PIIndex = PIIndex + 1
PathIndex(PIIndex) = 0
GoTo Returns
End If
End If
Exit Sub

Err:
MsgBox "搜索磁盘出现错误。" + Err.Description + "(" + CStr(Err.Number) + ")。vbCritical + vbOKOnly, "搜索错误"
摩珧PJ
2010-11-27 · TA获得超过589个赞
知道小有建树答主
回答量:316
采纳率:0%
帮助的人:293万
展开全部
最直接的就是查看图片的MD5值,一样的话绝对是,不一样的话就不是

当然也可以从大小、尺寸、名称等去做判断
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
闽昭影4411
2010-11-27 · TA获得超过207个赞
知道小有建树答主
回答量:378
采纳率:0%
帮助的人:285万
展开全部
图片名
本回答被网友采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式