7351 Series Digital Multimeter Operation Manual
6.3.4 Sample Program (RS-232)
6-9
3. Measured data output (For the Only mode)
For the Only mode, the measured data is output only if the RS-232 transmission is enabled and the
transmission buffer is empty after the measurement was complete.
The delimiter (<CR><LF>) is output for each measured value.
The measurement data output format is the same between GPIB and RS-232.
However, for RS-232, the block delimiter has been set to <CR><LF> and it cannot be changed.
4. Output of an inquiry result executed by an inquiry command
For the output of an inquiry result executed by an inquiry command, <LF> is output first, followed
by an inquiry result and delimiter, and finally a prompt at the end.
<LF> + Inquiry Delimiter (<CR><LF>) + <LF> + Prompt (=>) + Delimiter (<CR><LF>)
6.3.4
Sample Program (RS-232)
This section describes an example program that controls this instrument from a personal computer through
RS-232.
Language used: Microsoft Excel Visual Basic Application
Control used:
Microsoft Communications Control (RS-232 control)
Example 1:
Sets the measurement function to the 2W
measurement, detects the measurement end by using the status
byte, reads the measurement data, and then displays it for a cell.
Dim dt As String * 20
'Buffer for receiving data
Dim stb As String
'Buffer for receiving status byte
Dim sts As Integer
'Status byte after numerical conversion.
UserForm1.MSComm1.CommPort = 1
'Uses COM1.
UserForm1.MSComm1.Settings = "9600,N,8,1"
'9600 bps, Non parity, Data length: 8 bits, and Number of stop bits: 1
UserForm1.MSComm1.InputLen = 0
'Reads all of the buffers when the Input property is used.
UserForm1.MSComm1.PortOpen = True
'Opens the port.
UserForm1.MSComm1.InBufferCount = 0
'Clears the receiving buffer.
UserForm1.MSComm1.DTREnable = True
'Enables DTR.
dt = Space(20)
'Initializes the buffer for receiving data
UserForm1.MSComm1.Output = "*RST" & Chr(10)
'Initializes *RST:DMM.
Call rx_prompt
'Receives a prompt.
UserForm1.MSComm1.Output = "F3,PR2,TRS3,H0" & Chr(10)
'Sends each setting command.
'F3: 2W
resistance measurement
'PR2: Sets the sampling rate to MED.
'TRS3: Sets the trigger source to BUS.
'H0: Header OFF
Call rx_prompt
'Receives a prompt.