如何用VB做個簡單的條碼驗證器，，掃描槍輸入。。詳情見圖

我用過的掃描槍的輸入是用的com輸入，在VB里添加MSComm控件即可。視設備管理器里識別為com幾就選com幾。

創(chuàng)新互聯(lián)服務項目包括北票網站建設、北票網站制作、北票網頁制作以及北票網絡營銷策劃等。多年來，我們專注于互聯(lián)網行業(yè)，利用自身積累的技術優(yōu)勢、行業(yè)經驗、深度合作伙伴關系等，向廣大中小型企業(yè)、政府機構等提供互聯(lián)網行業(yè)的解決方案，北票網站推廣取得了明顯的社會效益與經濟效益。目前，我們服務的客戶以成都為中心已經輻射到北票省份的部分城市，未來相信會繼續(xù)擴大服務區(qū)域并繼續(xù)獲得客戶的支持與信任！

掃描的時候，MSComm控件有comEvReceive事件，可以作為觸發(fā)事件的，比如控件名是MSComm1

那這個MSComm1_OnComm()里，如果有這個觸發(fā)事件，就可以聲明一個字符型來接受MSComm1.input

這個輸入可能根據不同掃描槍不同要進行些處理以得到你需要的條碼實值

當然條碼槍具體給你什么你可以去Windows自帶的Hyper Terminal里看到

有個了這個條碼值，在你圖里對應的第二個表里其他的Textbox或者label控件就可以寫相應的Caption了，無非是if,case判斷了

不加數據庫連接的話就沒那么復雜了

空口說白話也不行，以下是基于Motolora Symbol P370/470型對條碼值的一些處理，直接寫在OnComm里了，process_no就是看到這個號碼做相應處理的判斷，可以另起爐灶寫一個到時候調用就是

Private Sub MSComm1_OnComm()

Dim st As String

If MSComm1.CommEvent = comEvReceive Then

st = MSComm1.Input

If st Chr(3) Then

st_all = st_all + st

Else

Txt_Pt.Text = Trim(Mid(st_all, InStr(st_all, Chr(2)) + 1, 10))

st_all = ""

Process_no

End If

End If

End Sub

以上只是com接收事件和取值的例子，判斷不必參考的，關鍵無非是把接收值讀入st,再對st_all這個全局變量賦值（不然你一會用那個條碼值可沒有個地方記錄了）

非com輸入恕在下暫時無能為力

vb.net 問題

不需要監(jiān)控接口，掃描槍應該是直接掃描出數字的，直接用一個Textbox顯示掃描結果就可以了

VB.NET 有4個TEXTBOX，4個掃碼槍,怎么在指定TEXTBOX對應到指定的掃碼槍

如果是usb掃描槍，是焦點在哪它就輸入在哪，不能自動對應到相應的文本框

如果是串口掃描槍可以實現(xiàn)你的功能，在代碼里判斷相應的串口對應文本框

vb.net 讀取掃描槍USB接口數據的實例

USB比較難抓數據，建議是USB模擬串口，或者直接就是串口，這樣數據比較好抓。

USB上傳模式是鼠標光標在哪數據就上傳在哪，所以你抓USB的數據的很難！

X貓-思刊辦公專營店

VB.NET TEXTBox控件我想控制它只能用掃描槍讀資料不能讓用戶輸入資料

在TEXTBox的屬性找到ReadOnly，設置為TURE

還有一個方法是用Lable不用Textbox

==========================================

就是我嘗試設置為ReadOnly設置為TURE

執(zhí)行以下代碼

TextBox1.Text = "123"

在在TEXTBOX能成功顯示能夠成功顯示123

VB.NET如何操作條碼掃描槍，如何設置，如何進行條形碼的設置及打印

這個要看掃描槍的通訊接口和通訊協(xié)議，以及接口程序是否支持VB.NET等。

網站欄目：vb.net掃描槍 vb調用usb掃描槍
分享URL：http://chinadenli.net/article18/dodeggp.html

成都網站建設公司_創(chuàng)新互聯(lián)，為您提供服務器托管、電子商務、定制網站、企業(yè)建站、網站設計公司、小程序開發(fā)

廣告

聲明：本網站發(fā)布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源： 創(chuàng)新互聯(lián)