Agilent Technologies E5071C Manual page 937

E5071C
Segment table for channel 1
Segmen Start
t valu
Number e
1 1.7
GHz
2
1.9
GHz
3 2
GHz
Sample Program in Excel VBA
Sub Setup()
'
Dim defrm As Long
Dim vi As Long
Const TimeOutTime = 20000
Dim Allocate1 As String, Allocate2 As String, File As String
Dim Para1(4) As String, Para2(2) As String
Dim Fmt1(4) As String, Fmt2(2) As String
Dim Star1(3) As String, Stop1(3) As String
Dim IfBw1(3) As Double, IfBw2 As Double
Dim Power1(3) As Double, Power2 As Double
Dim Cent2 As Double, Span2 As Double
Dim RefLev1(4) As Double, RefLev2(2) As Double, Scale1(4) As Double, Scale2(2) As Double
Dim Segm As Integer, Nop1(3) As Integer, Nop2 As Integer
Dim NumOfTr1 As Integer, NumOfTr2 As Integer
Dim RefPos1(4) As Integer, RefPos2(2) As Integer
Dim SendData As String
'
Segm = 3 ' Number of Segment Ch.1 : 3
Star1(1) = "1.7E9"
Star1(2) = "1.9E9"
Star1(3) = "2E9"
Stop1(1) = "1.9E9"
1164
Stop Number of
valu measuremen
e t points
1.9 21
GHz
101
2
GHz
2.2 21
GHz
' Start Frequency Ch.1 Segm.1: 1.7 GHz
' Segm.2: 1.9 GHz
' Segm.3: 2 GHz
' Stop Frequency Ch.1 Segm.1: 1.9 GHz
Powe
r
IF
bandwidt
h
50 kHz 0 dBm
10 kHz
-10
dBm
50 kHz 0 dBm