Agilent Technologies B1500A Uživatelská příručka Strana 119

  • Stažení
  • Přidat do mých příruček
  • Tisk
  • Strana
    / 208
  • Tabulka s obsahem
  • KNIHY
  • Hodnocené. / 5. Na základě hodnocení zákazníků
Zobrazit stránku 118
Agilent B1500 VXIplug&play Driver Users Guide, Edition 3 3-25
Programming Examples for Visual Basic Users
Staircase Sweep Measurement
Sub sweep_meas(vi As Long, ret As Long, m() As Long) ’1
Dim vpri1 As Double ’3
Dim vpri2 As Double
Dim vsyn1 As Double
Dim vsyn2 As Double
Dim vcon1 As Double
Dim vcon2 As Double
Dim i1comp As Double
Dim i2comp As Double
Dim hold As Double
Dim delay As Double
Dim s_delay As Double
Dim p1comp As Double
Dim p2comp As Double
Dim nop As Long
vpri1 = 0
vpri2 = 3
i1comp = 0.01
vsyn1 = 0
vsyn2 = 3
i2comp = 0.05
hold = 0
delay = 0
s_delay = 0
p1comp = 0
p2comp = 0
nop = 11 ’28
Dim rep As Long ’30
Dim sc() As Double ’primary sweep output data
Dim md() As Double ’sweep measurement data
Dim st() As Long ’status data at each step
Dim tm() As Double ’time data at each step
ReDim Preserve sc(nop) As Double
ReDim Preserve md(nop) As Double
ReDim Preserve st(nop) As Long
ReDim Preserve tm(nop) As Double ’38
Line Description
1 Beginning of the sweep_meas subprogram.
3 to 28 Declares variables, and defines the value.
30 to 38 Declares variables used to keep source data, measurement data,
status data, and time stamp data. Also defines array size.
Zobrazit stránku 118
1 2 ... 114 115 116 117 118 119 120 121 122 123 124 ... 207 208

Komentáře k této Příručce

Žádné komentáře