# checkbox test.bas

draw -1

top:

draw "text",40,50

form btn 40,147,60,12, "Enter",1



form cbx 40,110,w,h,"",1

form cbx 40,120,w,h,"",1

form cbx 40,130,w,h,"",1



x = asc(input$(1))



y=asc(s$(0))

m=asc(s$(1))

o=asc(s$(2))



y$=y:print y$

m$=m:print m$

o$=o:print o$

goto top

end

    Source: geocities.com/greenchile505