以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [原创]用摄像头读取2D条码,有好一点的摄像头的高手可以试试(VB版)  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=32882)

--  作者:qq121454970
--  发布时间:2013/5/9 20:00:00
--  [原创]用摄像头读取2D条码,有好一点的摄像头的高手可以试试(VB版)

本来想测试好再发帖的,可惜电脑摄像头不行

 

在選項卡中添加 提供的DLL文件,在選項中將出現

DataMatrixCamera自定義控件,將控件拖到Form上即可

使用實例:

Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Me.Timer1.Start()
        Me.DataMatrixCamera1.UseOrNot = True
        Me.DataMatrixCamera1.DataMatrixCamera_Start()
    End Sub

    Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Dim strTemp01 As String
        strTemp01 = Me.DataMatrixCamera1.getDataMatrix()
        If strTemp01 <> "" Then
            Me.TextBox1.Text = strTemp01
        End If
    End Sub

 


此主题相关图片如下:8c3dfec5a79de0b18326ac72.jpg
按此在新窗口浏览图片

 
 

 下载信息  [文件大小:   下载次数: ]
点击浏览该文件:datamatrixcamera_exp.rar


--  作者:lihe60
--  发布时间:2013/5/9 22:38:00
--  
说是代码有错误。
--  作者:qq121454970
--  发布时间:2013/5/9 22:51:00
--  

咦,我运行怎么没错呢,就是家里摄像头太差了,看不出来


--  作者:KFAGAIN
--  发布时间:2013/7/16 17:37:00
--  

只实现拍照功能,可以吗?


--  作者:KFAGAIN
--  发布时间:2013/7/16 17:38:00
--  

只用来实现拍照功能,可以的吗?


--  作者:qq121454970
--  发布时间:2013/7/17 12:29:00
--  
以下是引用KFAGAIN在2013-7-16 17:38:00的发言:

只用来实现拍照功能,可以的吗?

应该是的,我家的摄像头太差,所以没法测试