早教吧作业答案频道 -->其他-->
VB图像比较,同一个摄像机在不同时间拍出两幅图,现想对这两幅图进行比较,比较里面的图像有没有不同只要得出是不同就可以
题目详情
VB 图像比较,同一个摄像机在不同时间拍出两幅图,现想对这两幅图进行比较,比较里面的图像有没有不同只要得出是不同就可以
▼优质解答
答案和解析
一个个像素比吗?你把两张图放到两个PICTURE里,用point(X,Y)函数来获取坐标X,Y点的颜色值 Private Sub Command1_Click() Dim P1 As String, P2 As String Dim X As Long, Y As Long, Dif As Boolean P1 = "H:\2.JPG" P2 = "H:\3.JPG" Picture1.ScaleMode = 3 Picture2.ScaleMode = 3 Picture1.AutoSize = True Picture2.AutoSize = True Picture1.AutoRedraw = True Picture2.AutoRedraw = True Picture1.Picture = LoadPicture(P1) Picture2.Picture = LoadPicture(P2) If Picture1.ScaleWidth <> Picture2.ScaleWidth Or Picture1.ScaleHeight <> Picture2.ScaleHeight Then MsgBox "两图不一样。" Exit Sub End If For X = 1 To Picture1.ScaleWidth For Y = 1 To Picture1.ScaleHeight If Picture1.Point(X, Y) <> Picture2.Point(X, Y) Then Dif = True Exit For End If Next Y If Dif = True Then Exit For Next X If Dif = True Then MsgBox "两图不一样。" Else MsgBox "两图相同。" End If End Sub 窗体上放两个PICTURE控件分别是picture1和picture2,再放个command1控件,复制代码,把两个图片地址修改一下就行
看了VB图像比较,同一个摄像机在不...的网友还看了以下:
(1)利用微信“扫一妇”功能,通过智能手机的摄像头扫描二维码(如图甲)可快速获取网络信息,手机摄像 2020-06-18 …
我们经常提到的像:①平面镜成像;②投影仪成像;③照相机成像;④小孔成像;⑤放大镜成像,其中成实像的 2020-06-27 …
每个飞机只有一个油箱,飞机之间可以相互加油,一箱油可供一架飞机绕地球飞半圈每个飞机只有一个油箱,飞 2020-07-04 …
如图所示,用手机摄像头扫描二维码,可快速登录网页或读取数据.摄像头扫描二维码时相当于照相机成像原理 2020-07-19 …
人脸识别门禁一体机(如图),主用是通过摄像机镜头来捕捉人脸信息,该摄像机的成像与(填照相机、投影仪 2020-07-25 …
显像管是电视机中的一个重要元件,如图3所示为电视机显像管的偏转线圈示意图,圆心黑点表示电子枪射出的 2020-07-26 …
采样的含义是指在一幅图像的每个像素位置上测量由于数字计算机只能处理数字因此必须将连续的测量值转换为离 2020-11-29 …
甲图所示是我国运载火箭上的“箭载摄像机”,乙图是该摄像机拍得的火箭上升时的一幅照片.摄像机镜头相当于 2020-12-15 …
单线圈的电机是什么原理有一种电机好像只有一个绕组,像变压器一样转子在中间,另外为什么有只有运行绕组且 2020-12-15 …
二次函数y=a(x+h)2的图像和二次函数y=ax2的图像的什么,什么,什么一样只有图像的什么不同还 2021-02-14 …