
-64-
13-C Typical sample program
Sample program using Microsoft Visual Basic
(Sample program is contained in the accessony CD-ROM)
This sample program is designed to open and close a communication line, transmit data and control
how to receive data of a fixed or variable length. Refer to this program for programming.
Before executing a program, attach "Command Button", "Text Box" and "MSComm" to your form.
Note: Please use "MScomm" compornent which upon "Microsoft Visual Basic 6.0".
We do not apply communication of custom control software whidh made by other third party.
<Typical program>
Private Sub Form_Load()
Screen.MousePointer = 11 ’ Change mouse pointer to sandglass.
’ >>>>> Initialize communication line <<<<<
MSComm1.Handshaking = comRTS ’ Set handshake method (RS-CS control).
MSComm1.RTSEnable = True ’ RS signal = High (receivable)
MSComm1.CommPort = 4 ’ Set communication port (COM4).<<Change to using port.
MSComm1.Settings = "38400,n,7,2" ’ Set communication conditions.
MSComm1.PortOpen = True ’ Open communication line.
MSComm1.InBufferCount = 0 ’ Clear receive buffer.
MSComm1.OutBufferCount = 0 ’ Clear send buffer.
Screen.MousePointer = 0 ’ Initialize mouse pointer.
End Sub
Private Sub Command1_Click()
Dim Response As String
Dim TMCount As String
Dim CMode As String
Dim EMode() As String
Dim ReciveCnt As Integer
Text Box
MS Comm
Command Button
Design screen
Execution screen
13.Appendix
Kommentare zu diesen Handbüchern