Agilent Technologies 2000 X-Series Manual de Serviço Página 193

  • Descarregar
  • Adicionar aos meus manuais
  • Imprimir
  • Página
    / 930
  • Índice
  • MARCADORES
  • Avaliado. / 5. Com base em avaliações de clientes
Vista de página 192
:ACQuire Commands 7
Agilent InfiniiVision 2000 X-Series Oscilloscopes Programmer's Guide 193
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
Vista de página 192
1 2 ... 188 189 190 191 192 193 194 195 196 197 198 ... 929 930

Comentários a estes Manuais

Sem comentários