Agilent Technologies E5071C Manual page 1146

90| For I = 1 To 3
100| UserMenu.Item(I).Enabled = True
110| Next I
120|
130| For J = 4 To 10
140| UserMenu.Item(J).Enabled = False
150| Next J
160|
170| UserMenu.Item(1).Caption = "Setup"
180| UserMenu.Item(2).Caption = "Meas"
190| UserMenu.Item(3).Caption = "Exit"
200|
210| UserMenu.Show
220|
230| Do While State
240| DoEvents
250| Loop
260|
270| End Sub
UserMenu object
The procedures of the "UserMenu" object are described below.
Lines 70 to 190
The procedure when the first softkey (id: 1) is pressed.
Line 90: Returns the E5071C to the preset state.
Lines 110 to 130 For channel 1, sets the sweep start value to 1.73 GHz,
the sweep stop value to 1.83 GHz, and the number of measurement points
to 51.
Lines 150 to 170 After aborting the measurement, sets the trigger source
to the bus trigger and turns on the continuous trigger startup mode for
channel 1.
Line 190: Displays the buttons for the user menu function in the softkey
area.
Lines 210 to 320
The procedure when the second softkey (id: 2) is pressed.
Programming
1373