Add files via upload

This commit is contained in:
Андрей 2021-03-29 20:43:07 +04:00 committed by GitHub
parent 64c6352265
commit 35131ba393
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
90 changed files with 1738 additions and 0 deletions

View file

@ -0,0 +1,14 @@
SUB MAIN
DIM ITEM(5) AS STRING
DIM R AS INTEGER
ITEM(1)="A"
ITEM(2)="B"
ITEM(3)="C"
ITEM(4)="D"
ITEM(5)="E"
R = SELECT("Select One - Not Cancellable", ITEM, FALSE)
PRINT R
R = SELECT("Select One - Cancellable", ITEM, TRUE)
PRINT R
PRINT "*** Finished ***"
END SUB