»论坛 › 嵌入式/单片机论坛 › 51单片机 › VB6.0制作串口调试软件代码设计详解

VB6.0制作串口调试软件代码设计详解

查看数: 9008 | 评论数: 16 | 收藏 14

关灯 | 提示：支持键盘翻页<-左右->

帖子模式

幸福假小子

发布时间: 2019-3-14 20:47

正文摘要:

这是我第一次发帖子，发的不好多多担待！这学期学校开了单片机的课程，我从小就喜欢捣鼓一些小玩意，家里的电器设备基本上都拆过，有些能装上去，有些则装不上去。上了大学，经济条件宽裕了，加上网络资源日渐丰富， ...

ID:1011216 发表于 2022-4-10 09:52

串口简单收发不难，难再于多次收发还能稳定实现功能

ID:1010435 发表于 2022-4-9 22:39

我只会用VB做计算器

ID:1016815 发表于 2022-4-8 18:16

朋友能发源文件不，比较菜，困难多，谢谢!

ID:848824 发表于 2021-2-17 13:21

怎么控制小灯亮灭

ID:323651 发表于 2020-10-21 21:34

谢谢分享，做些简单应用，不错的

ID:298008 发表于 2020-3-29 11:18

谢谢楼主分享！！！

ID:609560 发表于 2019-11-8 09:37

CYY8530 发表于 2019-11-7 16:47
CY:
求指点一下，VB做一个通讯，读多功能仪表数据

先用下位機返回數據接收結果，確保數據被正確接收。然後再檢查下位機接收數據處理方法及返回數據

ID:637553 发表于 2019-11-7 16:47

幸福假小子发表于 2019-3-14 22:56
VB.NET我也会和C#.NET 差不多。不过我不喜欢C#的对括号{}

CY:
求指点一下，VB做一个通讯，读多功能仪表数据

CY:
读不出来，

CY:
问题出在哪里

CY:
串口2.3脚短接，文本框能显示出发送的指令码。

ID:637553 发表于 2019-11-7 16:47

幸福假小子发表于 2019-3-14 22:56
VB.NET我也会和C#.NET 差不多。不过我不喜欢C#的对括号{}

Private Sub Form_Load()
MSComm1.CommPort = 4 '设定 Com1 用来进行串口通讯
MSComm1.PortOpen = True
MSComm1.Settings = "9600,n,8,1" '9600 波特率,无校验,8 位数据位,1 位停止位

MSComm1.Output = Text1.Text '将 Text1 中的字符串写入传输寄存器
'Text2.Text = MSComm1.Input
End Sub

Private Sub Form_Unload(Cancel As Integer)
MSComm1.PortOpen = flse
End Sub

Private Sub Timer1_Timer()

Dim buffer As String '定义 buffer 为字符串
buffer = MSComm1.Input '将接收寄存器中的字符赋值给 buffer
List1.AddItem buffer '将 buffer 的值加入到列表框中显示出来
End Sub

ID:633458 发表于 2019-10-31 19:32