Agilent Technologies InfiniiVision 3000 X-Series Programmer's Guide

:ACQuire Commands 7
Agilent InfiniiVision 3000 X-Series Oscilloscopes Programmer's Guide 237
For lngI = lngSegments To 1 Step -1
' Set the segmented memory index.
myScope.WriteString ":ACQuire:SEGMented:INDex " + CStr(lngI)
myScope.WriteString ":ACQuire:SEGMented:INDex?"
strQueryResult = myScope.ReadString
Debug.Print "Acquisition memory segment index: " + strQueryResult
' Display the segment time tag.
myScope.WriteString ":WAVeform:SEGMented:TTAG?"
dblTimeTag = myScope.ReadNumber
Debug.Print "Segment " + CStr(lngI) + " time tag: " _
+ FormatNumber(dblTimeTag, 12)
Next lngI
Exit Sub
VisaComError:
MsgBox "VISA COM Error:" + vbCrLf + Err.Description
End Sub

Agilent Technologies InfiniiVision 3000 X-Series Specifications

General

Vertical Resolution	8 bits
Operating Temperature	0 °C to 50 °C
Channels	2 or 4
Display	8.5-inch WVGA (800 x 480)
Input Impedance	1 MΩ ± 1%
Trigger Modes	Edge, Pulse Width
FFT	Yes
Weight	5.5 lbs
Power Requirements	100-240 VAC, 50/60 Hz