ADAM通讯问题 点击:755 | 回复:2



建强

    
  • 精华:0帖
  • 求助:0帖
  • 帖子:15帖 | 21回
  • 年度积分:0
  • 历史总积分:84
  • 注册:2005年10月21日
发表于:2005-11-09 16:11:00
楼主
4017   4520模块通讯  VB
Private Sub Command1_Click()
  MSComm1.Output = "#010" & vbCr
  End Sub
  
   
  Private Sub Form_Load()
  MSComm1.CommPort = 1
  MSComm1.Settings = "9600,n,8,1"
  MSComm1.PortOpen = True
  End Sub
  
  Private Sub MSComm1_OnComm()
  Text1.Text = MSComm1.Input
  End Sub
  请教哪有错误吗?为什么采集不上来数据?text连显示都没有,若在form load中加mscomm1.rthreshold=1 ,则text1中闪烁一下,在text1中也看不到数据,怎么回事?怎么才能在text1中显示4017的数据呢 ?谢谢大家!学生刚学习VB通讯知识,请赐教。



GaryLin

  • 精华:0帖
  • 求助:0帖
  • 帖子:4帖 | 1186回
  • 年度积分:0
  • 历史总积分:1263
  • 注册:2003年4月15日
发表于:2005-11-10 13:29:00
1楼
try...
Text1.Text = Text1.Text & MSComm1.Input

今天真好

  • 精华:1帖
  • 求助:0帖
  • 帖子:8帖 | 317回
  • 年度积分:0
  • 历史总积分:359
  • 注册:2005年1月18日
发表于:2005-11-11 09:44:00
2楼
先有事例程序测一下硬件连接是否正常。

热门招聘
相关主题

官方公众号

智造工程师