请教,用vb.net编程让条码扫描仪扫描数据直接输入指定文本框中,这段代码如何写呢

请问,用vb.net编程让条码扫描仪扫描数据直接输入指定文本框中,这段代码怎么写呢?
用vb.net编程让条码扫描仪扫描数据直接输入指定文本框中,这里指的是不单只是用vb.net做的软件界面,且可以在任何有文本框的软件中输入已扫描的条码。在网上也找了一些代码,但貌似没有这段代码,只有输入显示中自身软件界面的文本框中。    

    '触发接收事件
    Public Sub SerialPort1_DataReceived(ByVal sender As Object, ByVal e As System.IO.Ports.SerialDataReceivedEventArgs) Handles SerialPort1.DataReceived
        Me.Invoke(New EventHandler(AddressOf Sp_Receiving)) '调用接收数据函数
    End Sub

    '接收数据
    Private Sub sp_Receiving(ByVal sender As Object, ByVal e As EventArgs)
        Dim strIncoming As String
        Try
            receivebytes.Text = Str(Val(receivebytes.Text) + SerialPort1.BytesToRead)
            If SerialPort1.BytesToRead > 0 Then
                Threading.Thread.Sleep(100) '添加的延时
                strIncoming = SerialPort1.ReadExisting.ToString '读取缓冲区中的数据
                SerialPort1.DiscardInBuffer()
                receivebox.Text = strIncoming
            End If
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try
    End Sub
receivebox.Text = strIncoming,这句代码直接显示在当前的界面的文本框中。请问,各位大师,要实现这个功能(用vb.net编程让条码扫描仪扫描数据直接输入指定文本框中)的代码如何写?

------解决方案--------------------
你接收条码扫描仪的程序放到后台去(或者写个托盘界面,把程序放到Windows右下角),把你需要条码录入的窗体处于最前端并处于激活状态。
receivebox.Text = strIncoming
收到数据后执行下面这段代码
My.Computer.Keyboard.SendKeys(strIncoming, True)