Dim mgr As AgilentRMLib.SRMCls Dim instrument As VisaComLib.FormattedIO488 Set mgr = New AgilentRMLib.SRMCls Set instrument = New VisaComLib.FormattedIO488 Set instrument.IO = mgr.Open('ASRL1::INSTR') Notice how the interface family for RS232 is ASRL. First, connect to the instrument similarly to connecting to an instrument using GPIB, LAN or USB interfaces. Here is a table of typical parameter values: Parameter Typical Values Baud Rate 300, 600, 1200, 2400, 4800, 9600, 19200, 38400, 57600, 115200 Parity / Data Bits None / 8 data bits, Even / 7 data bits, Odd / 7 data bits Handshake Mode None (no handshake mode), DTR/ DSR, Modem, RTS/ CTS, XON/ XOFF Number of Start Bits 1 bit Number of Stop Bits 1 bit, 2 bits You can write Visual Basic code that can set RS232 parameters for you. Refer to the instrument's documentation to determine settings for the following parameters.
0 Comments
Leave a Reply. |