e*r
发帖数: 1121 | 1 In the quickbasic program
"MENU:"
Is this a way to define the subroutine "MENU"? |
|
d******a
发帖数: 32122 | 2 原始basic
10 INPUT "What is your name: ", U$
20 PRINT "Hello "; U$
30 INPUT "How many stars do you want: ", N
40 S$ = ""
50 FOR I = 1 TO N
60 S$ = S$ + "*"
70 NEXT I
80 PRINT S$
90 INPUT "Do you want more stars? ", A$
100 IF LEN(A$) = 0 THEN GOTO 90
110 A$ = LEFT$(A$, 1)
120 IF A$ = "Y" OR A$ = "y" THEN GOTO 30
130 PRINT "Goodbye "; U$
140 END
QBasic / QuickBasic
CLS
PRINT "Guess the number!"
INPUT "Would you like to play? (Y/N): ", choice$ ' An input statement,
that takes what the user inputs... 阅读全帖 |
|
a**e
发帖数: 856 | 3 只list一个gps手表，好长时间，结果今天收到tomtom的email，是不理呢还是按照要求
来？
====================================
1. Remove unauthorized devices from the online shop within 48 hours of
receipt of this
2. Pull all advertisements for the devices within 48 hours of receipt of
this letter/email; and
3. Within 24 hours of receipt of this letter/email, provide written
confirmation to the
letter/email;
undersigned that Comet Distributors will not engage in unauthorized
reselling in the
future.In a spirit of cooperation and good... 阅读全帖 |
|
|
k****z
发帖数: 550 | 5 As I remember this is simply a mark,
in QB you can use some command to call it just like a function/subroutine. |
|
|
r******n
发帖数: 88 | 7 我用的是quickbasic，后八位好像是随机数。谢谢指教！ |
|
k****f
发帖数: 3794 | 8 现在还有人用quickbasic。。。。
想不通 |
|
y***w
发帖数: 44 | 9 assume a is the single precision float and b is the double precision float.
b=(double) (int (a*1e8)/1.0e-8)
You need to check the syntax for quickbasic, but you get the basic idea. |
|
