导航:首页 > 编程语言 > 虚拟串口开发vb示例程序

虚拟串口开发vb示例程序

发布时间:2024-04-11 15:33:32

『壹』 如何用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

『贰』 高分急求Commix(串口调试软件)VB源代码.有满意答案追加分数

vb写串口调试软件很简单,就用一个mscomm控件就可以了
下面是主要代码:
Private Sub Cmd_Click()
MSComm1.CommPort = 1 '决定串口号
MSComm1.Settings = "9600,n,8,1" '设置波特率、校验位、数据位、停止位的字符串
MSComm1.PortOpen = True '打开串口
MSComm1.Output = "abcd" '向串口发送字符串"abcd"
MSComm1.PortOpen = False '关闭串口
End Sub

Private Sub MSComm1_OnComm() '当收到串口返回值时触发这个事件
Dim s As String '定义一个字符串变量

s = MSComm1.Input '将串口返回值放到字符串变量s中
MsgBox s '以消息框的方式显示串口返回的内容
End Sub

『叁』 vb串口通信程序实例

我也是自己摸索开发出来的每一款VBtoCOM通讯,有具体的思路如下:

给你推荐一个工具“com串口测试工具 ComTone V1.0 中文绿色版”

1、打开你的噪音计的测试软件,调整好串口号、通讯频率等等,我用温度计举例说明。

阅读全文

与虚拟串口开发vb示例程序相关的资料

热点内容
cad文件大很卡如何解决 浏览:633
将java程序打包成apk 浏览:277
2021唱吧文件找不到了 浏览:463
华为p9手机文件管理 浏览:284
固定在工具栏的文件夹怎么查找路径 浏览:667
半条命2有几个版本 浏览:333
电脑管家微信备份文件夹 浏览:826
ubuntu文件夹解锁 浏览:34
网站多少钱一单 浏览:382
系统镜像恢复找不到文件 浏览:255
进什么网站 浏览:588
修改了配置文件代码没有读出来 浏览:749
vss数据库是什么 浏览:899
奇迹13单机系统找不到指定文件 浏览:719
flyme魅蓝3以前的版本 浏览:318
安卓文件管理哪些文件夹可以删除 浏览:290
安卓车载导航没有声音是怎么回事 浏览:810
cjson数组格式 浏览:159
vb文件在哪里 浏览:215
工厂里都招什么编程人员 浏览:932

友情链接