一个扫二维码的VB程序，扫码器提示扫描完成，但是VB程序中没有显示，请大侠指点，小弟刚玩VB！！！！！！

答案:1 悬赏:80 手机版

解决时间 2021-04-07 13:36

提问者网友：杀生予夺
2021-04-06 17:29

最佳答案

五星知识达人网友：妄饮晩冬酒
2021-04-06 18:19

If TempStr = Chr(13) Then

            tx3.Text = ""


            tx3.Text = Replace(ScanBarCode, Chr(13), "")

            ScanBarCode = ""

        End If你的这个IF 好像永远不工作吧,
改成下边试试:
If TempStr = Chr(13) Then



            tx3.Text = ""

Else

            tx3.Text = Replace(ScanBarCode, Chr(13), "")



            ScanBarCode = ""



        End If追问不好使，编完了扫码就是扫不上，我又编了一个，但是那个扫码显示的是FF/F1之类的，实际扫码内容是5C140414001，帮我看看这个吧！谢谢！

就是用扫码器把5C140414001这种数据扫到VB上的text控件上，大侠帮我看看我这个程序问题出在哪了？
追答你还是参考一下设备的说明吧. MSComm1.Input 到底是字符串还是字节.
估计问题就出在这里.

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息