| Server IP : 134.29.175.74 / Your IP : 216.73.216.160 Web Server : nginx/1.10.2 System : Windows NT CST-WEBSERVER 10.0 build 19045 (Windows 10) i586 User : Administrator ( 0) PHP Version : 7.1.0 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : OFF | Perl : OFF | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : /nginx/html/JimMartinson/_Archive/CST1794/Archive/Examples/ |
Upload File : |
NOMAINWIN WindowWidth = 250 WindowHeight = 200 RADIOBUTTON #1.radio1, "Intolerant conservatism", [set], [reset], 10, 10, 250, 25 RADIOBUTTON #1.radio2, "Radical liberalism", [set], [reset], 10, 40, 250, 25 RADIOBUTTON #1.radio3, "The status quo", [set], [reset], 10, 70, 250, 25 RADIOBUTTON #1.radio4, "Anything to benefit the rich", [set], [reset], 10, 100, 250, 25 BUTTON #1.button1, "Check radio button 1", [test], LL, 50, 3 OPEN "Vote for one or more" FOR Window AS #1 PRINT #1, "trapclose [quit]" WAIT [test] PRINT #1.radio1, "value?" INPUT #1.radio1, test$ NOTICE "The value of radio button 1 is "; test$ WAIT [set] WAIT [quit] CONFIRM "Are you sure you want to quit?"; quit$ IF quit$ = "no" THEN WAIT CLOSE #1 END