求助一个VB中利用MScomm控件与串口通信,要有vb程序

题目:通过VB窗口实现菜单的结账功能哪位能人能帮帮忙,非常感谢... 题目:通过VB窗口实现菜单的结账功能
哪位能人能帮帮忙,非常感谢
展开
 我来答
humanquan1
2013-05-10 · 超过36用户采纳过TA的回答
知道小有建树答主
回答量:103
采纳率:0%
帮助的人:94.1万
展开全部
怎麼标题和问题不是一个内容?
更多追问追答
追问
标题是问题中的一部分……
追答
'初始化部分
MSComm1.CommPort = 1
MSComm1.Settings = "9600,N,8,1"
MSComm1.InputLen = 0
MSComm1.InputMode = 1
MSComm1.RThreshold = 1
If MSComm1.PortOpen = False Then
MSComm1.PortOpen = True
End If

‘发送部分
b(0) = &H53
b(1) = &H54
b(2) = &H1
b(7) = &H45
b(8) = &H4E
For j = 1 To 4
b(2 + j) = "&H" & Hex(Asc(Mid(Text1.Text, j, 1)))
Next
If MSComm1.PortOpen = True Then
MSComm1.Output = b()
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式