主题:如何从键盘输入数字,则程序一直输出这个数字,一直到按下esc键为止
			 xinying2005
				 [专家分:0]  发布于 2007-07-25 19:09:00
 xinying2005
				 [专家分:0]  发布于 2007-07-25 19:09:00							
			如何从键盘输入数字,则程序一直输出这个数字,一直到按下esc键为止
这个程序如何用QB实现
						
					 
		
			
回复列表 (共6个回复)
		
								
				沙发
				
					 Matodied [专家分:7560]  发布于 2007-07-25 20:46:00
Matodied [专家分:7560]  发布于 2007-07-25 20:46:00				
				CLS
INPUT s
DO
  PRINT s
LOOP UNTIL INKEY$ = CHR$(27)
END
							 
						
				板凳
				
					 wzc1996 [专家分:1680]  发布于 2007-07-25 20:47:00
wzc1996 [专家分:1680]  发布于 2007-07-25 20:47:00				
				比我早一步!
CLS
INPUT N
DO
  PRINT N
LOOP UNTIL INKEY$ = CHR$(27)
END
							 
						
				3 楼
				
					 Matodied [专家分:7560]  发布于 2007-07-25 21:05:00
Matodied [专家分:7560]  发布于 2007-07-25 21:05:00				
				怎么又是抄的?
							 
						
				4 楼
				
					 剑圣风暴 [专家分:450]  发布于 2007-07-25 21:26:00
剑圣风暴 [专家分:450]  发布于 2007-07-25 21:26:00				
				你也抄过?
							 
						
				5 楼
				
					 wzc1996 [专家分:1680]  发布于 2007-07-25 21:28:00
wzc1996 [专家分:1680]  发布于 2007-07-25 21:28:00				
				没有啊!
							 
						
				6 楼
				
					 我的电脑 [专家分:990]  发布于 2007-09-30 14:08:00
我的电脑 [专家分:990]  发布于 2007-09-30 14:08:00				
				CLS
INPUT s
print s
while chr$(ltrim$(str$(s)))<>27:print s:wend
END
							 
									
			
我来回复