回 帖 发 新 帖 刷新版面

主题:如何将键盘的一个字符给一个变量

如何将键盘的一个字符给一个变量:
我想 让一个变量 等代我输入一个字符 ,而不用按回车如何做?

aa:
print "输入X(1或者2):",a$=inke$             如果用这个 a$=input(1) 也不行
if a$="1" or a$="2" then goto bb
goto aa
bb:
print a$
end
这样 :
因为程序运行很快,屏幕上全是:输入1或者2

要求的

屏幕上显示

输入X(1或者2):  等待一个字符,键入后不用回车,马上运行后面的,
                   要求在指定的字符范围, 否则输入状态,且在当前行的下一行

如何做,请高手帮帮忙,这个程序关系到我的工作,拜托了。

回复列表 (共5个回复)

沙发

CLS
PRINT "Input x(1 or 2):";
DO
  s$ = INKEY$
LOOP UNTIL s$ = "1" OR s$ = "2"
PRINT s$
END
执行这个程序,如果没输入或者输入的字符不是1也不是2,系统会一直等待,直到输入了1或2为止。

板凳

print "输入X(1或者2):";
do
  a$=input$(1)
loop until a$="1" or a$="2"
print a$

3 楼

谢谢 大家! 我认为你们的 程序应该是 可以的! 
我今天 在家里 调试了 很多 中方法,我是这样做到的

PRINT “输入1 或 2”
a$=input(1)
SELECT CASE a$

CASE 1

  f$=“我要的字符”:PRINT F$

CASE 2
  f$=“我要的字符”:PRINT F$

 CASE ELSE
  PRINT "重新输入:"
 END SELECT

4 楼

12注意引号

5 楼

[quote]print "输入X(1或者2):";
do
  a$=input$(1)
loop until a$="1" or a$="2"
print a$[/quote]

a$=input$(1)就直接停在那儿等待接收一个字符输入了吧,似乎不必再循环了

我来回复

您尚未登录,请登录后再回复。点此登录或注册