9-4
OTF-930
Operation Manual
Form1.MSComm1.Output = “DI” + Chr$(&HD) ʻSend receive data command
for RS-232 (echo back)
For I = 1 To 1000000 ʻ
Delay to wait for echo back
Next I
ans = Form1.MSComm1.Input ʻ
Read data from MSComm1 port
MsgBox (“Power = “ & ans) ʻ
Output read data to screen
Form1.MSComm1.PortOpen = False ʻClose communication port
End Sub ʻEnd subroutine
To Next Page
Loading...