Agilent Technologies 33250A User Manual (English)

To Next Page

To Previous Page

285

Chapter 6 Application Programs

Example: Microsoft Visual Basic for Windows

’

’ Using the Status Registers

’

Arb.Output "apply:sin 10e3,1,0" ’ 10kHz Sine wave; 1Vpp

Arb.Output "trig:sour bus" ’ Bus Trigger in Burst

Arb.Output "burst:ncycles 50000" ’ 50000 cycles x 0.1ms = 5s

Arb.Output "burst:stat on" ’ Turn ON burst mode

Arb.Output "*ese 1" ’ Operation complete enabled

Arb.Output "*sre 32" ’ Operation complete sets SRQ

Check_Errors ’ Routine checks for errors

Arb.Output "*trg;*opc" ’ Trigger burst

’ *OPC signals end of *TRG

Dim Stats As Integer ’ Variable to store status

Dim Done As Boolean ’ Controls While loop

Done = False

While Not Done

Arb.Output "*stb?" ’ Request status byte

Arb.Enter Stats ’ Read status byte

If Stats And 64 Then ’ Test Master Summary bit

Done = True

End If

Wend

MsgBox "Done", vbOKOnly, "33250A "

cmdStart.Enabled = True

End Sub

Private Sub Form_Load()

Dim IdStr As String

m_Count = 1

Arb.Output "*IDN?" ’ Query instrument information

Arb.Enter IdStr ’ Read result into IdStr

Caption = IdStr ’ Make that data the message on box

End Sub

Sub Check_Errors()

Dim ErrVal(0 To 1)

With Arb

.Output "syst:err?" ’ Query any errors data

.Enter ErrVal ’ Read: Errnum,"Error String"

While ErrVal(0) <> 0 ’ End if find: 0,"No Error"

lstErrors.AddItem ErrVal(0) & "," & ErrVal(1) ’ Display errors

lstErrors.Refresh ’ Update the box

.Output "SYST:ERR?" ’ Request error message

.Enter ErrVal ’ Read error message

Wend

End With

End Sub

Continued...

Other manuals for Agilent Technologies 33250A

Service Guide211 pages

Need help?

Do you have a question about the Agilent Technologies 33250A and is the answer not in the manual?

Agilent Technologies 33250A Specifications

General

Frequency Range	1 µHz to 80 MHz
Amplitude Range	10 mVpp to 10 Vpp into 50 Ω
Output Impedance	50 Ω
Modulation Types	AM, FM, PM, FSK, PWM
Sweep Modes	Linear, Logarithmic
Function Generator Type	Arbitrary
Waveforms	Sine, Square, Ramp, Triangle, Noise, Arbitrary
Interface	GPIB, USB