Anritsu 701012 User Manual - page 56
Manual is about: Anritsu USB Power Sensor User Guide
of
70
Using the Demo Application
Sample Visual Basic Code
B-4
MA24106A UG
'Delay routine
Public Sub Delay(ByVal Seconds As Single)
'
Dim fStartTimer As Single
Dim fFinish As Single
'
fStartTimer = Timer
'
Do
DoEvents
fFinish = Timer
If Abs(fFinish - fStartTimer) > Seconds Then
Exit Do
End If
Loop
'
End Sub
************************************************************************