Word = hex(....)
Sd = ENQ + "00FFWW5D" + 0123 + "02" + Word
frmMain.Rscom.Output = Sd
Twrite = 1
Timer1.Interval = 80
Timer1.Enabled = True
Delay: DoEvents
If Twrite = 1 Then GoTo Delay
Timer1.Enabled = False
RD = frmMain.Rscom.Input
If Left(RD, 5) = ACK + "00FF" Then exit sub
.........
SD = ENQ + "00FFWR3D0120" + "02"
Moncom.Output = SD
Tread = 1
Timer2.Interval = 100
Timer2.Enabled = True
Delay4: DoEvents
If Tread = 1 Then GoTo Delay4
Timer2.Enabled = False
RDD = Moncom.Input
If Left(RDD, 5) = STX + "00FF" Then EXIT SUB
谁能帮忙解释下啊 ????
ENQ + "00FFWW5D"