MSComm控VB件的应用中的RS232协议
2个回答
展开全部
Comm.CommPort = 1
On Error Resume Next
If Comm.PortOpen = False Then
Comm.PortOpen = True
If Comm.PortOpen = True Then
Comm.Settings = "4800,n,8,1"
Comm.InputMode = 1
Comm.InputLen = 0
Comm.InBufferSize = 1024
Comm.OutBufferSize = 512
Comm.SThreshold = 0
Comm.RThreshold = 1
Comm.InBufferCount = 0
Comm.OutBufferCount = 0
On Error Resume Next
If Comm.PortOpen = False Then
Comm.PortOpen = True
If Comm.PortOpen = True Then
Comm.Settings = "4800,n,8,1"
Comm.InputMode = 1
Comm.InputLen = 0
Comm.InBufferSize = 1024
Comm.OutBufferSize = 512
Comm.SThreshold = 0
Comm.RThreshold = 1
Comm.InBufferCount = 0
Comm.OutBufferCount = 0
本回答由网友推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
