找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 2113|回复: 2
打印 上一主题 下一主题
收起左侧

关于VB上位机的问题,求帮助

[复制链接]
跳转到指定楼层
楼主
ID:322045 发表于 2018-5-7 22:54 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
我用VB做了一个上位机想用来控制51单片机,模拟了数值增加,减少和复位键,但是上位机上的数值增加键和减少键按一次,单片机的数值会不断增加,再按别的也没反应,复位键也只能按一次,按别的也都没反应请问是什么问题?
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖 顶 踩
回复

使用道具 举报

沙发
ID:303383 发表于 2018-5-7 23:41 | 只看该作者
提示: 作者被禁止或删除 内容自动屏蔽
回复

使用道具 举报

板凳
ID:322045 发表于 2018-5-8 09:59 | 只看该作者

那请问是上位机的程序还是单片机的程序呢
下面是我上位机的程序
Private Sub Command1_Click()
strBuff = "1"
MSComm1.Output = strBuff
End Sub

Private Sub Command2_Click()
strBuff = "2"
MSComm1.Output = strBuff
End Sub

Private Sub Command3_Click()
strBuff = "3"
MSComm1.Output = strBuff
End Sub

Private Sub Command4_Click()
End
End Sub

Private Sub Form_Load()
Label1.Caption = "-----"
Label2.Caption = "-----"
Command1.Caption = "增加"
Command2.Caption = "减少"
Form1.WindowState = 2 '界面设置为最大
MSComm1.Settings = "9600,n,8,1"
MSComm1.OutBufferSize = 2   '设置MSComm1发送缓冲区为2字节
MSComm1.OutBufferCount = 0 '清除发送缓冲区
MSComm1.CommPort = 3  '指定使用com4
MSComm1.PortOpen = True '打开接口
End Sub

Private Sub MSComm1_OnComm()
Text1.Text = MSComm1.Input
Text2.Text = MSComm1.Input
End Sub
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表