发布时间 : 星期四 文章VB程序的设计期末复习试题更新完毕开始阅读da7ec3d0eef9aef8941ea76e58fafab068dc444e
图1用Access创建的学生基本情况数据表
图2 查询程序运行界面
程序如下，请补充完整。
Private ADOcn As Connection Private Sub Form_Load() [1]
ADOcn.Open \Source=c:\\ \
End Sub
Private Sub Command1_Click() Dim strSQL As String
Dim ADOrs As [3] Recordset ADOrs.ActiveConnection = ADOcn
strSQL = \学生基本情况 Where 学号=\ [4]
If [5] ADOrs.EOF Then
Text2 = ADOrs.Fields(\学号\ Text3 = ADOrs.Fields(\姓名\ Text4 = ADOrs.Fields(\籍贯\ [6]
.. ..
[2] MsgBox \要查询的学号不存在，请重新输入!\信息提示\ Text1 = \
[7] End If End Sub
Private Sub Command2_Click() [8] End
五、编写程序题
1．编写一工资调整程序。若基本工资大于等于800元，增加工资20%，若小于800元大于600元，则增加工资15%；若小于600元则增加工资10%。要求在文本框Text1中输入某职工的基本工资，单击“计算”按钮，在标签框Label1中输出增加后的工资。程序运行界面如图4所示。
图2
2．请根据下列描述编写购物优惠程序。某商场为了加速促成商品流通，采用购物打折的优惠办法，每位顾客一次购物（1）在100元以上者，按九五折优惠；（2）在200元以上者，按九折优惠；（3）300元以上者，按八折优惠；（4）500元以上者按七折优惠。在窗体上添加两个文本框和一个命令按钮，要求在Text1中输入购物商品总金额，单击命令按钮，在Text2中输出优惠价。程序运行结果如图2所示。
.. ..
图2
3．请根据下列描述编写财务部门征收劳务酬金所得税程序，规定如下： （1）收入在1200元以内，扣税3%；
（2）收入在1200-4000元内，1000元以上部分扣税15%，
（3）收入在4000-5000元内，4000元以内按（2）的方法扣税，4000元以上部分，扣税20%，
（4）当收入达到5000元以上，扣税25%。 程序运行界面如图3所示。
图3
答案：
.. ..
一、单项选择题（每小题2分，共30分） 1.C 2.D 3.C 4.B 5.D 6.A 7.D 8.C 9.D 10.C 11.B 12.C 13.D 14.D 15.A 16.B 17.B 18.B 19.B 20.B 21.A 22.B 23.D 24.D 25.B 26.B 27.D 28.B 29．D 30．B 31.D 32.D 33.D 34.B 35.A 36.C 37.C 38．C 39.B 40.C 二、填空题（每空1分，共15分） 1．Vbp frm 2．2 3．3000
4．逻辑错误 编译错误 5．Name Index 6．25
7.Dim R(-2To 2,0 To 4) As Integer 8．Dim C(-1 To 3,0 To 4) As Integer 9．过程内部 Dim Private Public 10．For???Next循环 Do???Loop循环
11．P1. Picture = LoadPicture(\12．True
13. UDP LocalIP 14.TCP/IP UDP
15．变体型(或Variant)
16. open\17. 0
18．abcdef
19. 整个应用程序 Public
20．引用参数传递（或按址传递） 按值传递
21. Y MOD 4=0 And Y MOD 100<>0 OR Y MOD 400=0 22．右 上
23．本地数据库 远程数据库 外部数据库 24．数据引擎
25．Winsock Internet Transfe WebBrowser 26．Locked TabStop 27．MDI窗体 28. 右 上
39．数据库引擎
30．外部数据库 远程数据库
三、阅读程序题 1． x=2 y=3
x=2 y=6
.. ..