vb.net键盘扫码 vb读扫码枪程序

VB.net 中如何获取键盘输入的ASCii码

Private Sub Form1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Me.KeyPress

        If Asc(0) Then

        textbox1.text="0"

        end if

        end sub

相关问答

Q1: VB.NET 有4个TEXTBOX，4个扫码枪,怎么在指定TEXTBOX对应到指定的扫码枪

如果是usb扫描枪，是焦点在哪它就输入在哪，不能自动对应到相应的文本框

如果是串口扫描枪可以实现你的功能，在代码里判断相应的串口对应文本框

Q2: vb.net 如何吧字符穿转换成键盘码

（1）在Form1上布置一个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将显示对应键的键盘码