vb 如何识别 图片
发布网友
发布时间：2022-05-12 15:17
共1个回答
热心网友
时间：2023-10-11 13:58
你的代码中Picture2有图片，Image1没图片，当然不会相等。
Picture属性的值是句柄，每次调用LoadPicture函数，都生成新句柄，即使加载同一个文件，句柄也不同。
要比较图片是否相同，应该事先定义图片。
通用声明区定义图片变量：
Form_Load()事件中把图片赋值（用Set）：
Set sp0 = LoadPicture(App.Path + "\资源\灯座.jpg")Set sp1 = LoadPicture(App.Path + "\资源\未亮的灯泡.jpg")
Set sp2 = LoadPicture(App.Path + "\资源\亮的灯泡.jpg")
Picture1.Picture = sp1
Picture2.Picture = sp0
以后加载图片，直接用变量，不再用LoadPicture函数，这样如果是同一个图片，Picture属性就会相等了。
