发布时间 : 星期日 文章第3章 Visual Basic程序设计基础更新完毕开始阅读
3．4．5 格式输出函数
用格式函数Format(或Formats)可以使数值、日期或字符型数据按指定的格式输出。其格式为：
Format(表达式，格式字符串)
该函数的功能是按“格式字符串”指定的格式输出“表达式”的值。“表达式”可以是数值、日期型或字符型的表达式。“格式字符串”是一个字符串常量或变量，由专门的格式说明字符组成，这些说明决定了表达式的显示格式和长度。当格式字符串为常量时，必须放在双引号中。
若表达式为数值型，常用的格式说明符有：
(1)#：数字占位符。如果表达式在格式字符串中#的位置上有数字存在，就显示出来；否则，该位置就什么都不显示。如果要显示的数值的位数小于格式字符串指定的区段长度，则该数值靠区段左端显示：如果要显示的数值大于指定的区段长度，则数值照原样显示。
例如，
Print Format(12345,\Print Format(12345,\则显示： 12345 12345
(2)0：数字占位符。与#功能相同，只是多余的位以0补齐。例如， Print Format(12345,\则显示： 000012345 (3)．：小数点占位符。小数点与#或0结合使用，可以放在显示区段的任何位置。根据格式字符串的位置，小数部分多余的数字按四舍五入处理。例如，
Print Format(123.45,\Print Format(123.456,\则显示： 123．45 123．46 (4)，：千分位符号占位符。从小数点左边一位开始，每3位用一个逗号分开。逗号可以放在小数点左边的任何位置，但不能放在头部，也不能紧靠小数点。例如，
Print Format(12345.67,\则显示：12,345.67
另外，还可以使用：百分号(%)、美元符号($)、正号(+)、负号(-)、指数形式(E+或E-)等来设置数值型数据的输出格式。例如，
Print Format(0.257,\ '显示：25.7% Print Format(567.8,\ '显示：$567.80 Print Format(567.8,\ '显示：+567.8 Print Format(567.8,\ '显示：-567.8 Print Format(567.8,\ '显示：5.68E+02
同样，利用Format还可设置日期型和字符型数据的输出格式。常用的日期型、字符型的格式说明符如表3-8所示。
表3-8常用格式说明符 字符 dddddd 说明 举例 以完整日期表示法显示日期系列数(包括Print Format(Date,\年月日) 显示：2001年6月3日 Print Format(Date,\显示：June Print Format(Date,\显示：2001 mmmm 以全称来表示月(January～December) YYYY 以四位数来表示年 hh 以有前导零来显示小时(hh)、分(nn)或秒Print Format(Time,\(ss) 显示：15：02：03 以完整时间表示显示(包括时、分、秒)，Print Format(Time,\用系统识别的时间格式定义的时间分隔符显示：15:05:24 进行格式化。缺省的时间格式为hh:mm:ss ttttt 在中午前以12小时配合大写AM符号来Print Format(Tline,\AM/PM 使用；在中午后以12小时配合大写PM来显示：15:08:08PM 使用 字符占位符。显示字符或是空白。如果字符串在格式字符串中@的位置有字符存Print Format(\在，就显示出来：否则就在那个位置上显显示：ABab 示空白。一般字符是自右向左的填充 与@功能相似。一般字符是自左向右的填Print Format(\充 显示:ABab 强制小写。将所有字符以小写格式显示 强制大写。将所有字符以大写格式显示 强制由左而右填充字符占位符 PrintFormat(\显示：abab Print Format(\显示：ABAB Print Format(\显示：ABab @ & < > !
3．5 Visual Basic语句的书写格式（P62） 3．5．1 关键字与标识符 关键字：又称为系统保留字，是具有固定含义和使用方法的字母组合。如：Private、Sub、Caption、Print、Exp等。关键字用来表示系统提供的标准过程、方法、属性、函数和各种运算符等。
标识符：由程序开发人员定义的，用作变量名、符号常量名、控件名称和过程名称等的字母组合。
定义标识符时应遵循以下原则：
(1)标识符的第一个字符必须是字母。
(2)后续的字符可以是字母、数字和下划线。 (3)关键字不能被定义为标识符。
(4)标识符的长度不能超过255个字符。
3．5．2 程序语句
语句：VB程序中的一行代码称为一条程序语句，是执行具体操作的指令，是程序的基本功能单位，每个语句行以回车(Enter)键结束。
一个语句行的长度：最多不能超过1023个字符：。
完整的程序语句可以简单到只有一个关键字。例如，BEEP。
完整的程序语句也可以是各种元素的组合。例如，可把当前系统时间赋值给标签的Caption属性：
Label1.Caption = Time ↑ ↑ ↑ ↑ 对象名 属性名 赋值号 函数
语法：建立程序语句时必须遵从的构造规则称为语句语法。缺省情况下，在输入语句的过程中，Visual Basic将自动对输入的内容进行语法检查，如果发现语法错误，将弹出一个信息框提示出错的原因。Visual Basic还会约定对语句进行简单的格式化处理，例如，将关键字、函数的第一个字母自动变为大写。
3．5．3 程序的书写规则
1．VB代码不区分字母的大小写
系统保留字自动转换每个单词的首字母大写。 2．语句书写自由
在—般情况下，输入程序要求一行一句，一句一行。但Visual Basic允许使用复合语句行，即把几个语句放在一行中，各语句之间用冒号(：)隔开。一个语句行的长度最多不超过1023个字符。例如，
Text1.text=\
在输入程序时，为了能够比较方便地在代码编辑窗口中显示、查看程序代码，也可以通过续行符(_)把一个较长的程序语句放在几行中。例如，
strMystr=\当前用户为：\StrUsername
在使用续行符时，在它前面至少要加一个空格，并且续行符只能出现在行尾。 3．注释：为了便于读懂程序，有利于程序的维护和调试 关于注释语句的格式和使用，将在第4章进行讲解。
3．5．4 命令格式中的符号约定
有关命令格式中的符号约定如表5-9所示。
表3-9命令格式中的符号约定
符号 <> [] | ,? ?
习题三（P65）
一、选择题
1．下列 是日期型常量。
(A)\ (B)2/1/02 (C)#2/1/02# (D){2/1/02}
含义 必选参数表示符，尖括号中的内容为必选参数。 为可选参数表示符，中括号中的内容视具体情况可以省略而采用默认值 为多中取一表示符，竖线分隔的多个选项，具体使用时选择其一 重复符号，表示同类参数的重复出现 省略符号，表示省略了可以不涉及的内容 2．下面 不是字符串常量。
(A) \你好\ (B) \ (C) \ (D)#False# 3．表达式Int(8*sqr(36)*10^(-2)*10+0.5)/10的值是 。 (A).48 (B).048 (C).5 (D).05
4．下列符号常量的声明中， 是不合法的。
(A)Const a As Single =1.1 (B)Const a As Integer=\(C)Const a As Double=Sin(1) (D)Const a=\5．系统符号常量的定义可以通过 获得。
(A)对象浏览器 (B)代码窗口 (C)属性窗口 (D)工具箱
6．要强制显示声明变量，可在窗体模块或标准模块的声明段中加入 语句。 (A)Option Base 0 (B)Option Explicit (C)Option Base 1 (D)Option Compare
7．假设X=3，Y=6，Z=5，则表达式(X^2+Y)/Z的值是 。 (A)1 (B)5 (C)3 (D)2．4
8．假没A=3，B=7，C=2，则表达式A>B OR B>C的值是 。 (A)True (B)False (C)表达式有错 (D)不确定 9．产生[10,37]之间的随机整数的Visual Basic表达式是 。 (A)Int(Rnd(1)*27)+10 (B)Int(Rnd(1)*28)+10 (C)Int(Rnd(1)*27)+11 (D)Int(Rnd(1)*28)+11 10．表达式Int(-17.8)+Abs(17.8)的值是 。 (A)0 (B)0．8 (C)-0．2 (D)-34．8 11．表达式Left(\的值是 。
(A)how (B)are (C)you (D)how ar e)ou 12．表达式Right(\的值是 。 (A)Bei (B)jing (C)eiji (D)ijin
1 3．代数式x1-|a|+In10+sin(x2+2Π)/COS(57°)对应的Visual Basic表达式是 。 (A)X1-Abs(A)+Log(10)+Sin(X2+2*3.14)/Cos(57*3.14/18U) (B)X1-Abs(A)+Log(10)+Sin(X2+2*Π)/Cos(57*3.14/1 80) (C)X1-Abs(A)+Log(]0)+Sin(X2+2*3.14)/Cos(57) (D)X1-Abs(A)+Log(10)+Sin(X2+2*Π)/Cos(57)
14．下列描述数学表达式3y+-a+3x2+4x3-2b的正确的VB表达式是 (A)3y+(a+3*x^2+4*x^3)/(1+2*x+x^2)-2*b (B)3*y+(a+3*x^2+4*x^3)/(1+2*x+x^1)-2b (C)3*y+(a+3*x*2+4*x^3)/1+2*X+X^2-2*b (D)3*y+(a+3*x^2+4*x^3)/(1+2*X+X^2)-2*b
二、填空题 1．闰年的条件是：年号(Y)能破4整除，但不能被100整除；或者年号能被称400整除。表示该条件的布尔表达式是： 。
2．一元二次方程ax2-bx+c=0有实根的条件是a+0，并且b2-4ac≥0，表示该条件的布尔表达式是： 。
3．表示条件“变量x为能被5整除的偶数”的布尔表达式是： 。 4．写出下面Format函数的值：
Format(5459.4,\值为：
Format(334.9, \值为： Format(0.6725,\值为： Format(0.6725,\值为： Format(\值为：