

In this task, the goal is to input a string and the integer 75000, from graphical user interface.



See also: User input/Text

html "<TABLE BORDER=1 BGCOLOR=silver>
<TR><TD colspan=2>Please input a string and a number</TD></TR>
 
<TR><TD align=right>String</TD><TD><input type=text   name=str size=18></TD></TR>
<TR><TD align=right>Number</TD><TD><input type=number name=num size=18 value=75000></TD></TR>
 
<TR><TD colspan=2 align=center>"
 
button #go, "Accept", [go]
button #ex, "Exit",   [ex]
 
html "</TD></TR></TABLE>"
Wait
 
[go]
print #request get$("str")
print val(#request get$("num"))
wait
 
[ex]
end