Dialog


Dialog Title$, Msg$ {Buttons$(),{c|c$}}


This command pauses execution and displays a dialog box.


For Example:

Dialog "Data Entry Error", "You have entered a bad value"




You can change the text on the button:

Dialog "Data Entry Error", "You have entered a bad value", "Retry"




You can set the positive, negative and neutral buttons on a dialog:

Dim Buttons$(2) = "Positive", "Negative", "Neutral"

Dialog "Full example", "Notice the order of the buttons.", Buttons$(), a

If a = 0 Then Print "Positive"
If a = 1 Then Print "Negative"
If a = 2 Then Print "Neutral"




Or for a yes/no dialog:

Dim Buttons$(1) = "Yes", "No"

Dialog "You have won", "Would you like to play again?", Buttons$(), a$

If a$ = "Yes" Then 100
If a$ = "No" Then 9999






Become a Patron