《程序设计基础教程》 高等教育出版社 课后习题参考答案

习题

第一章程序与编程环境

一、填空题

1. 工程，Form_Load

2. 事件（触发）

3. 空缺，空缺

4. CurrentX, CurrentY

5. maxButton, BorderStyle = 1 or 3 or 4 or 5

6. Alignment, 空缺，空缺

7. Style, LoadPicture

8. Line, Shape

9. 重画10. FillStyle, maxLength, Locked 12. 空缺

13. sub, 对象名，事件名14. 方法，Object.Method, text1.setfocus()

15. Name, minButtom, CurrentX(Y), Caption

16. Interval, Enable 17. timer, Interval, ms(毫秒)

18. Mouse Down, Click, LoastFocus

19. .Frm, .Frx, .bas. cls. Vbp 20. Rem, Rem 语句

二、简答题（略）

第二章数据的类型、表示以及运算

一、请指出下列哪些是VB的合法常量，并说明原因

（1）√（2）X 常量不能加类型说明符号改成123.4 （3）X与上题类似，如果是常量，则类型说明符放在后面（4）√等价于2E3 (5) √（6）√等于十进制的4113

(7)X 如果是16进制要写&符号（8）X 指数不能为小数（9）X 月份超过12，日超过31 （10）√（11）√（12）√等价于上一题(13)X 8进制数每一位不能超过8 （14）√（15）X 变量，常量要为基本数据类型的值（16）√

二、找出合法变量

（1）√（2）√如果与控件Label1同在一个应用程序里面，该变量会屏蔽掉控件Label1

(3) X 保留字（4）√（5）X 变量不能以数字开头（6）变量不能有小数点

（7）√（8）√数组变量（9）X保留字（10）√可以，但rnd()不可以，rnd()是函数 (11) √（12）√（13）√（14）X ’符号表示注释（15）X 这是表达式，不是变量（16）X 同上，是表达式

三、指出下列数据x,y,z的声明是否正确，如果正确请指明其类型

（1）√ x--long, y—variant, z—integer

(2) √ x—long, y—long, z—integer

(3) √ x—double, y—double, z—integer

(4) X 变量x &中间不能有空格

（5）√自动转换成字符串

（6）X 变量声明不能直接赋值

（7）√

（8）√自动转换成字符串

（9）X 常量不能把函数写上去

（10）√

四、写出下列表达式的结果

（1）1 (2) 1 (3)false (4) ab12 (5)123 (6)出错，加法表达式中如果有一个是数值类型，则“+”表示加号，而不是字符的链接符号（7）False (8)true (9)

true (10) false 默认转换成相同类型（数值），建议这里把2改成D试试

（P.S.

布尔类型TRUE = -1, FALSE = 0;

优先顺序：^(乘方)→-(求负)→*、/→\(整除)→MOD→+、-）

五、写出下列函数的结果

（1）3 （2）2 （3）-2 （4）0 （5）2 （6）23 （7）23 （8）1 （9）1 （10）21 日期差分函数，参数“m”为两年月份之差

六、写出满足以下条件的表达式

（1）fix(rnd()*90)+10 (2)chr(fix(rnd()*26)+65) (3) (A mod 100)\10

(4) A mod B<>0 (5)A>“A”and A<“Z”(6) AC AND B>C

(8) (A>C AND BC) (9) A+B>C AND B+C>A AND C+A>B

(10)A=“及格”XOR B=“及格”(11)Round(A/B,2) (12) Len(A)<>0 或 Len(A)>0 (13) “A10?”(14) Len(A)>=3

七、填空题

1. “”, # #

2. x>=10 and x<20

3. (y mod 3=0) or (y mod 7 =0)

4. sin(x)^2 + (1/2)*sqr(x^2-y^2)

5. 16

6. T, F

7. SIN(ATN(1))

8. Randomize

9. (c>chr(97) and cchr(57))

10. vbCrLf 11. CInt(), 0

12. 从第12个月开始，循环一年12个月

13. ab, cd0 14. Variant, String, Integer

15. Now() 16. DateDif(#2011-5-1#,now(), “m”)

八、请指明下列程序运行后，各个变量的值

（1） 3 5

（2） 120

(3) False

(4) -3

九、分析下面程序中的错误并修改，使其能够完成指定的功能

（1）Print 20000+0&+20000

或 Print 20000&+20000&

(2) 改1：

A=x

A= a+a

B=x

B=2*b