本人初学vb,很是生疏,手头有个项目用3058r采集数据,但是折腾了两天始终不得要领,有种相当强烈的挫折感。我这个小测试程序已经简单的不能再简单了,一个按钮,一个文本输入。按下开始按钮,通过串口给3058r 下指令,读第一路的输入,输入值在文本框中显示出来,但是始终都没有数据回传回来,我的串口部分代码如下
Private Sub Command1_Click()
CmdoutSNG(0) = "&h" + "01" ‘地址码
CmdoutSNG(1) = "&h" + "04" ‘功能码 读寄存器
CmdoutSNG(2) = "&h" + "01" ‘起始地址高位
CmdoutSNG(3) = "&h" + "00" ‘起始地址低位
CmdoutSNG(4) = "&h" + "00" ‘寄存器个数高位
CmdoutSNG(5) = "&h" + "01" ‘寄存器个数低位
MSComm1.Output = CmdoutSNG ‘输出指令数据
Delay (0.1) ‘延时40ms
instring = MSComm1.Input ‘返回值
‘text1.Text = MSComm485.Input
MSComm1.InBufferCount = 0 ‘清除缓冲区
Text1.Text = instring
On Error Resume Next
End Sub
期待用过该模块的朋友为我指点一二,感激不尽!
楼主最近还看过