Lambda SR1, Operation Manual, Page: 247 / 317

SR1 Operation 247
© 2014 Stanford Research Systems
Call SR1.Instrument.UserMessage("User Did Not Respond!",10)
end if
first displays the message window shown below:
And then displays the second message if the user does not act within the 5 second time-out period.
UserOKCancel
Displays a dialog box with a user message and an "OK" and "Cancel" button. For instance:
x = SR1.Instrument.UserOKCancel("Proceed?",10)
creates the window:
The function returns 1 if OK is pressed, 0 if Cancel is pressed or the window is closed, and -1 if the
window times out.
UserChoice
The UserChoice function displays a window with a drop-down box displaying a list of choices:
dim x
x = SR1.Instrument.UserChoice("Some Choices...", "A,B,C", 5)
if x = "A" then
Call SR1.Instrument.UserMessage("User Picked A",10)
elseif x = "B" then
Call SR1.Instrument.UserMessage("User Picked B",10)
elseif x = "C" then
Call SR1.Instrument.UserMessage("User Picked C",10)
elseif x = "-timedout-" then
Call SR1.Instrument.UserMessage("Window Timed Out",10)