Agilent Technologies B1500A Uživatelská příručka stáhnout pdf (Strana 124)

3-30 Agilent B1500 VXIplug&play Driver User’s Guide, Edition 3

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.

1 2 ... 119 120 121 122 123 124 125 126 127 128 129 ... 207 208

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

Žádné komentáře

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

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

Související produkty a manuály pro Měření, testování a kontrola Agilent Technologies B1500A