
2600AS-900-01 Rev. B / September 2008
Return to
3-19
Series 2600A System SourceMeter
Section 3: Test Script Processor Interaction
Figure 3-10
GUI after calling the function (GPIB)
Call send(Addr%, "MeasCurr(10)", intStatus)
‘
Call function with
‘
ntimes=10 and then
‘
enter data.
Do
strReturnMessage = udfGetTspResponse()
txtData.Text = txtData.Text & strReturnMessage &
vbCrLf
Loop Until Left(strReturnMessage, 3) = "TSP"
If strReturnMessage = "TSP?" Then
txtStatusDesc.Text = "Error Occurred"
Call send(Addr%, "print(errorqueue.next()", intStatus)
strReturnMessage = udfGetTspResponse()
txtStatusDesc.Text = txtStatusDesc.Text &
strReturnMessage & vbCrLf
‘
Get output from
‘
function.
End If
‘
Take appropriate
‘
action based on
‘
error message.