Agilent Technologies InfiniiVision 5000 Series Programmer's Manual page 746

12
Programming Examples
' There are also some additional initialization commands, which are
' not used, but shown for reference.
' -------------------------------------------------------------------
Private Sub Initialize()
746
On Error GoTo VisaComError
' Clear the interface.
myScope.IO.Clear
' RESET - This command puts the oscilloscope into a known state.
' This statement is very important for programs to work as expected.
' Most of the following initialization commands are initialized by
' *RST. It is not necessary to reinitialize them unless the default
' setting is not suitable for your application.
myScope.WriteString "*RST"
' AUTOSCALE - This command evaluates all the input signals and sets
' the correct conditions to display all of the active signals.
' Same as pressing the Autoscale key.
myScope.WriteString ":AUTOSCALE"
' CHANNEL_PROBE - Sets the probe attenuation factor for the selected
' channel. The probe attenuation factor may be set from 0.1 to 1000.
myScope.WriteString ":CHAN1:PROBE 10"
' CHANNEL_RANGE - Sets the full scale vertical range in volts.
' range value is 8 times the volts per division.
' Set the vertical range to 8 volts.
myScope.WriteString ":CHANNEL1:RANGE 8"
' TIME_RANGE - Sets the full scale horizontal time in seconds.
' range value is 10 times the time per division.
' Set the time range to 0.002 seconds.
myScope.WriteString ":TIM:RANG 2e-3"
' TIME_REFERENCE - Possible values are LEFT and CENTER.
' - LEFT sets the display reference on time division from the left.
' - CENTER sets the display reference to the center of the screen.
' Set reference to center.
myScope.WriteString ":TIMEBASE:REFERENCE CENTER"
' TRIGGER_TV_SOURCE - Selects the channel that actually produces the
' TV trigger. Any channel can be selected.
myScope.WriteString ":TRIGGER:TV:SOURCE CHANNEL1"
' TRIGGER_MODE - Set the trigger mode to EDGE, GLITch, PATTern, CAN,
' DURation, IIC, LIN, SEQuence, SPI, TV, or USB.
' Set the trigger mode to EDGE.
myScope.WriteString ":TRIGGER:MODE EDGE"
' Reset the oscilloscope to the defaults.
Agilent InfiniiVision 5000 Series Oscilloscopes Programmer's Guide
' Set Probe to 10:1.
The
The