重庆分公司,新征程启航

为企业提供网站建设、域名注册、服务器等服务

vb.net编写串口通讯,vb串口编程

VB.NET串口通讯怎么发送和接收十六进制?

串口通信最终都是用二进制传输的,你用代码把二进制转化成十六进制就可以了。不需要额外设置。

发展壮大离不开广大客户长期以来的信赖与支持,我们将始终秉承“诚信为本、服务至上”的服务理念,坚持“二合一”的优良服务模式,真诚服务每家企业,认真做好每个细节,不断完善自我,成就企业,实现共赢。行业涉及成都花箱等,在网站建设公司成都全网营销推广、WAP手机网站、VI设计、软件开发等项目上具有丰富的设计经验。

如何用VB编写串口程序

有串口控件MSComm控件

MSComm 控件示例

下面这个简单的例子演示了用调制解调器进行基本的串行通讯:

Private Sub Form_Load ()

' 保存输入子串的缓冲区

Dim Instring As String

' 使用 COM1。

MSComm1.CommPort = 1

' 9600 波特,无奇偶校验,8 位数据,一个停止位。

MSComm1.Settings = "9600,N,8,1"

' 当输入占用时,

' 告诉控件读入整个缓冲区。

MSComm1.InputLen = 0

' 打开端口。

MSComm1.PortOpen = True

' 将 attention 命令送到调制解调器。

' Chr$函数:返回 String,其中包含有与指定的字符代码相关的字符 。

MSComm1.Output = "ATV1Q0" Chr$(13) ' 确保

' 调制解调器以"OK"响应。

' 等待数据返回到串行端口。

Do

DoEvents

Buffer$ = Buffer$ MSComm1.Input

Loop Until InStr(Buffer$, "OK" vbCRLF)

' 从串行端口读 "OK" 响应。

' 关闭串行端口。

MSComm1.PortOpen = False

End Sub

VB.net串口通讯接收数据写法

Do

Application.DoEvents()

Loop Until MSComm1.InBufferCount = 13

Dim a As String = MSComm1.Input

Label1.Caption = a.Substring(1, 9)

Label2.Caption = a.Substring(10, 3)


名称栏目:vb.net编写串口通讯,vb串口编程
转载源于:http://cqcxhl.cn/article/dsshchg.html

其他资讯

在线咨询
服务热线
服务热线:028-86922220
TOP