1.CLS的进一步用法
CLS0 清除屏幕上所有文本和图形
CLS1 仅清除图形观察窗口
CLS2 仅清除文本窗口
CLS 如果图形观察窗口是活动的,则只清除观察窗口,否则清除文本窗口
CLS语句使用完毕后,光标会到屏幕左上角位置.
2.INPUT语句和函数
INPUT语句在在上一篇已经说过了,在这说明一下:键盘输入的数据类型和个数必须和变量名保持一致,如果输入项目多,或少,或类型不一致就会出现错误,具体的情况可以自己试验.
LINE INPUT语句可以读一行信息,它可以读取有逗号,空格的一行信息并赋值给一个字符串变量.
格式INE INPUT[;]["提示信息";]<字符串变量名>
说明输入的信息不能超过254个字符,变量名必须是字符串类型的变量,否则会出错.
INPUT$函数可以接收键盘输入的信息,但不需等待用户输入回车
格式:INPUT$(N)
N是整型变量,说明接收的字符个数.
函数可以从键盘读取N个字符,赋值给函数INPUT$.
下面写一个程序,要求用户输入大写字母A结束程序,如果输入错误,提示用户输入的字符是什么,然后重新要求输入.
[例子]在QB中输入以下程序:
CLS
start:
PRINT "Please press key A to end..."
k$ = INPUT$(1)
IF k$ = "A" THEN END
PRINT "You press the key "; k$
GOTO start
3.PRINT语句的进一步用法
PRINT USING自编格式语句,可以自己设置如何显示内容.
格式RINT USING <格式符串>;<表达式>[;]
用格式符号串所指定的格式显示数字或字符串,表达式.
格式符串是由双引号括起来的一串显示控制描述符,有数字格式和字符格式两类.
(1)数字格式
Ⅰ.#表示输出项中数的位数.例如"######"表示输出的数字有6位整数.
Ⅱ.小数点表示输出项中小数点的位置.例如"###.###"表示输出的数据有3位小数.
Ⅲ.逗号放在数字的整数部分,作为数字的分隔符号.通常3位插一个逗号,例如"##,###,###,###".
Ⅳ.正号表示输出数字时不论数字正负都显示数字的符号,如果正号加在前面,则符号在前,如正号在后,则符号在后.
Ⅴ.负号表示如果数字是整数显示一个空格,如果是负数显示符号.如果负号加在前,则符号在前,如果正号在后,则符号在后.
Ⅵ.四个向上的箭头(^^^^)在格式符末尾出现,表示输出的数字以科学形式出现.
Ⅶ.星号(*)表示输出时数据的前导空格用星号代替.
Ⅷ.美圆($)表示输出数据的前导空格用美圆代替.
Ⅸ.百分号(%)表示输出数据的前导空格用0来代替.
Ⅹ.下划线(_)表示下划线后一个符号不做格式控制处理,而是当一个字符显示.
[例子]在QB中输入以下程序:
CLS
A = 1234567.8901#
B = -1234567.8901#
C = 1234567890
PRINT USING "+####,###"; A
PRINT USING "-####,###"; B
PRINT USING "####^^^^"; A
PRINT USING "##,###,###,###"; C
PRINT USING "##.###^^^^"; A
PRINT USING "**####,####"; A
PRINT USING "%%%#####,##"; B
PRINT USING "_T_o_t_a_l_:######,###"; A
END
按F5运行程序,屏幕上显示:
%+1,234,568
-%-1,234,568
123E+04
1,234,567,936
1.235E+06
**1,234,568
%%%%-1,234,568
Total: 1,234,568
(2)字符格式
Ⅰ.惊叹号(!)表示只输出字符串的第一个字符.
Ⅱ.反斜杠加空格(\这里是N个空格\)表示输出字符串前面N+2个字符.如果字符串的长度不到N+2个,则不足的用空格补.
Ⅲ.AND符(&)表示不加修饰的原样输出.
[例子]在QB中输入以下程序:
CLS
PRINT USING "!"; "Yongji Electric Machine Factory"
PRINT USING "\ \"; "Yongji Electric Machine Factory"
PRINT USING "&"; "China Northern Locomotive & Rolling and Stock Industry Group"
END
按F5运行程序,屏幕上显示:
Y
Yongji Electric Machine F
China Northern Locomotive & Rolling and Stock Industry Group
欢迎光临 栖息谷-管理人的网上家园 (https://bbs.21manager.com.cn/) | Powered by Discuz! X3.2 |