Rigol DS1000D Manual do Utilizador descarregar pdf (Página 114)

RIGOL

Programming Guide for DS1000E, DS1000D Series

3-10

Label1(0).ForeColor = &HFFFF& 'yellow

End If

Note: Codes of CH2 and MATH are similar to CH1, users can modify homologous

parameters to get their codes and add them to CH2 and MATH.

6. Dblclick Label and add the following codes:

Dim i As Long

Dim sendbuf As String

Dim readbuf As String

rSize = 100

sendbuf = ":CHAN1:DISP?"

i = GetTMCDeviceNum

Call SendToUSB(sendbuf)

readbuf = Read_USB()

If readbuf = "ON" Then

Label1(0).ForeColor = &HFFFF& 'yellow

Else

Label1(0).ForeColor = &H808080 'gray

End If

sendbuf = ":CHAN2:DISP?"

i = GetTMCDeviceNum

Call SendToUSB(sendbuf)

readbuf = Read_USB()

If readbuf = "ON" Then

1 2 ... 109 110 111 112 113 114 115 116 117 118 119 ... 136 137

Comentários a estes Manuais

Sem comentários