第2章习题答案

第2章课外练习参考答案

一、判断题

1.窗体是一个容器，可以容纳其它控件，但窗体不能像控件一样接收事件( ×)。

2.界面对象的Top、Left属性，是指对象左上角相对于上级容器的坐标( √)。

3.设置好窗体字体属性后再向窗体中添加控件，则控件的默认字体属性与窗体相同( √)。

4.对象的属性实质上就是变量( √)。

5.函数Val ("2a")的返回值为2 ( √)。

6.标签对象的Caption属性值为字符串型，运行时可以被重新赋值( √)。

7.使用窗体对象的Cls方法可以清除窗体中标签的Caption（×）。

8.属性、方法和事件都是对象的成员（×）。

9.事件只能由用户的鼠标或键盘动作触发产生（×）。

10.清除文本框的内容可以用文本框的Cls方法（×）。

11.VB的窗体与不同类型的控件都有各自不同的事件集（√）。

12.工程文件的扩展名是. frm（×）。

13.整型变量有Byte、Integer、Long 3种类型（√）。

14.Byte类型的数据，其数值范围在-255～255之间（×）。

15.Double类型数据可以精确表示其数值范围内的所有实数（√）。

16.在逻辑运算符Not、Or、And中，运算优先级由高到低依次为Not、Or、And（×）。

17.关系表达式是用来比较两个数据的大小关系的，结果为逻辑值（√）。

18.一个表达式中若有多种运算，在同一层括号内，计算机按函数运算→逻辑运算→关系运算→算术运算的顺序对表达式求值（×）。

19.赋值语句的功能是，计算出表达式值并转换为相应类型数据后，再为变量或控件的属性赋值（√）。

20.用Dim关键字声明数值型变量时，该数值型变量自动被赋初值为0（√）。

21.若行If语句中逻辑表达式值为True，则关键字Then后的若干语句都要执行（×）。

22.在行If语句中，关键字End If是必不可少的（×）。

23.块If结构中的Else子句可以缺省（√）。

24.使用On Error GoTo语句并编写相应程序，可以捕获程序中的编译错误（×）。

二、选择题

1.Integer类型数据能够表示的最大整数为D。

A、275

B、215-1

C、216

D、216-1

2.货币类型数据小数点后面的有效位数最多只有B。

A、1位

B、6位

C、16位

D、4位

3.输入对话框InputBox的返回值的类型是A。

A、字符串

B、整数

C、浮点数

D、长整数

4.运算符“\”两边的操作数若类型不同，则先C再运算。

A、取整为Byte类型

B、取整为Integer类型

C、四舍五入为整型

D、四舍五入为Byte类型

5.下列程序段的输出结果是B。

a=10: b=10000: x=log(b)/log(a): Print "lg(10000)="; x

A 、lg(10000)=5

B 、lg(10000)=4

C 、4

D 、5

6. Print 语句的一个输出表达式为 D ，则输出包括日期、时间信息。

A 、Date

B 、Month

C 、Time

D 、Now

7. 语句Print "5*5" 的显示结果是 B 。

A 、25

B 、"5*5"

C 、5*5

D 、出现错误提示

8. 语句“Form1.Print Tab(10); "#"”的作用是在窗体当前行 A 。

A 、第10列输出字符“#”

B 、第9列输出字符“#”

C 、第11列输出字符“#”

D 、输出10个字符“#”

三、填空题

1. 语句“Dim C As String ”定义的变量C ，可用于存放控件的Caption 的值。

2. 长整型变量（Long 类型）占用 4 个字节。

3. 表达式2 * 4^3 + 4 * 6 / 3 + 3^2的值是 145 。

4. 表达式16 / 2 - 2 ^ 3 * 7 Mod 9的值是 6 。

5. 表达式81 \ 7 Mod 2 ^ 2的值是 3 。

6. 语句Print Not 10>15 And 8<5+2的输出结果为 False 。

7. 设x 为一个两位数，将其个位和十位数交换后所得两位数的VB 表达式是 (x mod

10)*10+x\10 。

8. 求a 与b 之积除以c 的余数，用VB 表达式可表示为 a*b Mod c 。

9. 声明单精度常量PI 代表3.1415926的语句是 Dim PI As Single =3.1415926 。

10. #20/5/01#表示 日期 类型常量。

11. 将数学式b 改写成VB 表达式ac 42− b^2 - 4*a*c 。

12. 将数学式 (x+1) e 2x 改写成VB 表达式 (x+1)*e ^ (2*x) 。

13. 将数学分式x x x 21

122−+−写成VB 表达式 (x^2-1) / (x^2+1) – 2*x 。 14. 设x=5，y=3，求x>3 And xy 的值是 True 。

15. 设A=5，B=6，C=7，D=8，计算表达式3>2*B OR A=C AND B<>C OR C>D 的值是 False 。

16. 判断整型变量n 是否为两位正整数的逻辑表达式是 n>9 And n<100 。

17. 关系表达式的运算结果是什么类型的值？ 布尔

18. 两个数值型数据如果使用“+”运算符进行拼接，会出现什么结果？ 两数相加

19. 若x ＞y ，则交换变量x 、y 值的行If 语句写作 If x>y then t=x : x=y : y=t 。

四、程序设计题

1. 编程求下列分段函数的值。要求双击窗体时弹出输入对话框，输入x 并确定后，计算函数的值，然后将输入的数据和计算的结果辅以简明的说明文本，用消息对话框输出。

⎩⎨⎧>+≤+=3)3(31)(4/1x x x x x f 解：

Private Sub Form_DblClick()

Dim x As Single, y As Single

x = InputBox("请输入x")