QBASIC 怎样单页输出数据？

这么长的程序，神经得了，照我的办，最简单。
只要在输出前加一句：
flag = flag + 1
if flag = 22 then input flag$:cls
注：
flag和flag$在程序中的作用均为控制输出，如果在程序里有着两个变量，须用别的变量代替。

你可以控制输出内容的行数,到达一定的行之后,用类似下面的方法进行键盘捕捉:

WHILE a$ <> "x"
a$ = INKEY$
IF a$ = "a" THEN
LOCATE 5, 5
PRINT "Hello"
END IF
IF a$ = "b" THEN BEEP
IF a$ = "c" THEN CLS

LOCATE 10, 10
PRINT TIME$
WEND
INKEY获得用户键盘的输入,然后继续后面的内容输出.如果用户没有输出,就等待

WHILE a$ <> "x"
a$ = INKEY$
IF a$ = "a" THEN
LOCATE 5, 5
PRINT "Hello"
END IF
IF a$ = "b" THEN BEEP
IF a$ = "c" THEN CLS

LOCATE 10, 10
PRINT TIME$
WEND
INKEY

草，没我说的了啊