发表于:2007-09-06 09:32:00
2楼
我用功能码10写的是这样:"0110初始地址000204" + QQ QQ为给的数据12345678的16进制,但结果就是出不来
我的程序是这样,帮我看看错在哪:
Dim strout As String
Dim str As String
Dim QQ As String
Dim pp As String
Timer1.Enabled = False
pp = Text2.Text
QQ = Hex(pp)
str = "01101200000204" + QQ '传入D512,D513,D512地址为1200
LRCC = LRC(str)
strout = ":" + str + LRCC + Chr$(13) + Chr$(10)