Private?Sub?Form1_KeyPress(ByVal?sender?As?Object,?ByVal?e?As?System.Windows.Forms.KeyPressEventArgs)?Handles?Me.KeyPress
10年積累的成都網(wǎng)站設(shè)計(jì)、成都做網(wǎng)站經(jīng)驗(yàn),可以快速應(yīng)對(duì)客戶對(duì)網(wǎng)站的新想法和需求。提供各種問題對(duì)應(yīng)的解決方案。讓選擇我們的客戶得到更好、更有力的網(wǎng)絡(luò)服務(wù)。我雖然不認(rèn)識(shí)你,你也不認(rèn)識(shí)我。但先網(wǎng)站策劃后付款的網(wǎng)站建設(shè)流程,更有上猶免費(fèi)網(wǎng)站建設(shè)讓你可以放心的選擇與我們合作。
If?Asc(0)?Then
textbox1.text="0"
end?if
end?sub
如果是usb掃描槍,是焦點(diǎn)在哪它就輸入在哪,不能自動(dòng)對(duì)應(yīng)到相應(yīng)的文本框
如果是串口掃描槍可以實(shí)現(xiàn)你的功能,在代碼里判斷相應(yīng)的串口對(duì)應(yīng)文本框
(1)在Form1上布置一個(gè)Label,用來顯示鍵盤碼
(2)窗體代碼如下
Imports?System.Windows.Forms
Imports?System.IO
Imports?System.Net
Imports?System.Windows.Forms
Imports?System.IO
Imports?System.Net
Public?Class?Form1
Private?Sub?Form1_Load(sender?As?Object,
e?As?EventArgs)?Handles?MyBase.Load
KeyPreview?=?True
End?Sub
Private?Sub?Form1_KeyDown(sender?As?Object,
e?As?KeyEventArgs)?Handles?MyBase.KeyDown
Label1.Text?=?e.KeyValue
End?Sub
End?Class
按鍵盤上的鍵,Label1將顯示對(duì)應(yīng)鍵的鍵盤碼
名稱欄目:vb.net鍵盤掃碼 vb讀掃碼槍程序
路徑分享:http://chinadenli.net/article2/hiicic.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站維護(hù)、靜態(tài)網(wǎng)站、微信小程序、定制網(wǎng)站、小程序開發(fā)、網(wǎng)站導(dǎo)航
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來源: 創(chuàng)新互聯(lián)