VB程序设计教程第四版课后答案
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
vb 课后习题答案
第一章习题参考答案
一、填空题
1、对象事件驱动
2、编译运行模式解释运行模式
二、简答题
1、简述 VB 的特点。
答:①可视化的程序设计方法
②面向对象的程序设计思想
③事件驱动的编程机制
④结构化的程序设计语言
⑤高度的可扩充性
⑥强大的数据库访问能力
⑦支持动态数据交换
⑧支持对象链接与嵌入
2、简述 VB 的安装过程。
答:①向光驱中放入VB 安装光盘;
②计算机将运行自动安装程序,若没有,执行VB 目录下的Setup.exe;
③根据提示逐一回答问题,并点击“下一步”;
④点击“完成”;
2、如何启动 VB。
答:三种方法:
①单击“开始”按钮,选择“程序”菜单下的“Microsoft Visual Basic 6.0 中文版”菜单项并单击;
②双击桌面上的VB6.0 快捷图标;
③在“开始”菜单的运行对话框中输入命令来启动VB;
第二章习题参考答案
一、选择题:
1-10、 DCACD BCBBC
11-20、 BADCA BBAAB
21-29、 AACBB CDDC
二、填空题
1.窗体、控件
2.属性值
3.属性窗口设置、代码窗口设置
4.事件过程
5.对象名、下划线、事件名
6. Form_Click
第三章习题参考答案
一、选择题
1、B
2、 C
3、 A
4、B
5、 A
6、 C
7、 C
二、填空题
1、 11
字符型、字节型、整型、长整型、单精度型、双精度型、货币型、逻辑型、日
期型、对象型、变体型。 String、 Byte、 Integer 、 Long、 Single、
Double、 Currency、 Boolean
、Date、 Object 、 Variant
2、双引号 (英文 )、#
3、 ASCII、1 、2
4、 public 、通用、 Dim、 Static、Private、 Static
5、 &、 +、+
6、 Now()、 Time 、日期型
三、解答题
1、(3)
2、 (1 )
3、( 1)常量(关键字)( 2)字符型常量( 3)逻辑型常量( 4)变量( 5)字符串常量( 6)变量
(7)字符串常量( 8)变量( 9)日期型常量(题目应是 #11/16/1999# )( 10)数值型常量(单精度)
4、31
5、( 1)
(1+y/x)/(1-y/x) (2) x^3+3*x*y/(2-y)
(3) sqr(abs(a*b-c^3)) ( 4)sqr(s*(s-a)*(s-b)*(s-c))
6、
7、( 1) 13 ( 2) 17
(3) #1999-11-12# ( 4) zxy123ABC
8、( 1) 19 ( 2) 8.16666666666667
(3) 5. 25 (4) 2
9、( 1) -4 (2) 2 . 82842712474619 ( 3) -3 ( 4) 49 (5)” hello (”6)He
7)16 ( 8)“-459.65 ”( 9) 5
10、( 4)
11、( 2)
12、( 4)
第四章习题参考答案
一、选择题:
1—7: DAABBCD
二、填空题
1. 500.00%
2.将字号扩大为原来的二倍
3. B
三、编程题(略)
1.文本框、标签和命令按钮的名称分别为text1 、 label1、 command1
Private Sub Command1_Click()
Label1.caption=text1.text
Command1.caption=text1.text
End Sub
2.单价、数量、折扣和应付款对应的文本框的名称分别为:text1 、
text2 、 text3
计算和清除命令按钮的名称分别为:command1 和 command2 。
和 text4 ,
Private Sub Command1_Click()
Text4=val(text1)*val(text2)*val(text3)
End Sub
Private Sub Command2_Click()
Text1 = ””:
Text2=
””:
Text3=
””:
Text4=
””
End Sub
3.文本框、“转大写”命令按钮和“转大写”命令按钮的名称分别为text1 、 command1 和
command2
Private Sub Command1_Click()
Text1=Ucase(text1)
End Sub
Private Sub Command2_Click()
Text1=Lcase(text1)
End Sub
第五章习题参考答案
一、选择题:
1—11: CAABBABBBCC
二、填空题
1.(3) 2. 1 2 3 3.2 2 3 4. 160 5. 9
6.78 7.x<=5 (或 x<6 或 x<7) 8. B
9.iSum iSum+j 1250
三、编程题
1.Private Sub Form_Click()
Dim i%,s%
S=0
For i = 101 To 200 step 2
If i mod 3<>0 then
Print i
S=s+i
End If
Next i
Print s
End Sub