Rigol DS1000Z Series Spécifications Page 168

  • Télécharger
  • Ajouter à mon manuel
  • Imprimer
  • Page
    / 172
  • Table des matières
  • MARQUE LIVRES
  • Noté. / 5. Basé sur avis des utilisateurs
Vue de la page 167
RIGOL Chapter 3 Programming Demos
3-14 DS1000Z Programming Guide
Dim matches As String * 200 ' keep the acquisition device number
Dim s32Disp As Integer
' acquire the usb source of visa
Call viOpenDefaultRM(defrm)
Call viFindRsrc(defrm, "USB?*", list, nmatches, matches)
' Open the device
Call viOpen(defrm, matches, 0, 0, vi)
' Send the command to query the status of CH1
Call viVPrintf(vi, ":CHAN1:DISP?" + Chr$(10), 0)
' Acquire the status of CH1
Call viVScanf(vi, "%t", strRes)
s32Disp = CInt(strRes)
If (s32Disp = 1) Then
' Send the setting command
Call viVPrintf(vi, ":CHAN1:DISP 0" + Chr$(10), 0)
Label1(0).ForeColor = &H808080 'Gray
Else
Call viVPrintf(vi, ":CHAN1:DISP 1" + Chr$(10), 0)
Label1(0).ForeColor = &HFFFF& 'Yellow
End If
' Close the device
Call viClose(vi)
Call viClose(defrm)
6. Save and run the project and the exe program will be obtained. When the oscilloscope is correctly
connected to the PC, the ON/OFF control of any channel can be realized.
Vue de la page 167
1 2 ... 163 164 165 166 167 168 169 170 171 172

Commentaires sur ces manuels

Pas de commentaire