发表于: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通讯知识,请赐教。