VisualBasic程序设计期末综合练习题一_百度文库解析

1、Visual Basic程序设计期末综合练习题一一、单项选择题1. Visual Basic是一种面向对象的可视化编程语言,采取了（的编程机制。A. 从主程序开始执行B. 按过程顺序执行C. 事件驱动D. 按模块顺序执行2. 在Visual Basic中,窗体文件的扩展名为（。A. .vbpB. .frmC. .clsD. .bas3. Visual Basic6.0集成开发环境有三种工作模式，下列不属于三种工作模式之一 的是（。A. 设计模式B. 编写代码模式C. 中断模式D.执行模式4. 如果对象的名称为Mytext,而且对象有一个属性Text，那么在代码中引用该属 性的正确格式是（。A.

2、 Text.MytextB. Mytext*TextC. Mytext.（TextD. Mytext.Text5. 下列关于变量的说法不正确的是（。A. 局部变量在声明它的过程执行完毕后就被释放了B. 局部变量的作用域仅限于声明它的过程C. 静态局部变量是在过程中用Static语句声明的D. 局部变量是指那些在过程中用Dim语句或Static语句声明的变量6. 关于对象的属性不正确的是（。A. 对象的属性一般有属性名和属性值B. 可通过属性窗口设置属性的值C. 可通过程序代码设置属性的值D. 对象的所有属性值均可在设计时设计7. 在设计阶段,双击窗体上的某个控件时，打开的窗体是（。A. 工程资

3、源管理器窗口B. 工具箱窗口C. 代码编辑器窗口D. 属性窗口8. 要在窗体的标题内显示“myfrm使用的语句是（。A. Form.captio n=myfrmB. Forml.captio n=myfrmC. Forml.Pri ntmyfrmD. Form.Pri ntmyfrm9. 在VB中，下列变量名不合法的是（。A. file_1B. fileC. file-1D. file_1_210. 在设计动画时，用时钟控件来控制动画速度的属性是（A. E nabledB. MoveC. I ntervalD. Timer11. 要从ForNext循环中退出循环，应使用（语句。A. ExitB

4、. Exit ForC. Co nti nueD. Stop Loop12. 文本框ScrollBars属性设置了非零值，却没有效果，原因是（。A. 文本框中没有内容B. 文本框的Locked属性为TrueC. 文本框的 MultiLine属性为TrueD. 文本框的MultiLine属性为False13. 要利用公用对话框控件来显示打开文件”对话框，需要调用控件的（方法。A. ShowPri nterB. ShowOpe nC. ShowSaveD. ShowColor14. 下列赋值语句正确的是（。A. x = y +zB. y + z = xC. -y= xD. 4 = x +y15.

5、确定一个控件在窗体上位置的属性是（A. Width 和 HeightB. Width 或 HeightC. Top 和 LeftD. Top 或 Left16. VB程序中设置断点的按键是（。A. F5 键B. F6 键C. F9 键D. F10 键17. 如果希望以模态方式显示窗体 Forml,下列正确的语句是（。A. Forml.Show 0B. Form1.ShowC. Form1.Show 1D. 以下都不正确18用语句Dim A（-2To 3As Integer所定义的数组的元素的个数是（A. 3B. 4C. 519. 如果创建了命令按钮的控件数组，那么Click事件的参数是（。A.

6、 Captio nB. TagC. I ndexD. 没有参数20. 要向图片框Picturel中加载“d:zhiwu.bmp 图像文件，应使用语句（。A. P1.Picture=LoadPicture（d:hai nan zhiwu.bmpB. P1.Picture=LoadPicture（d:hai nan zhiwu.bmp C. Picture1.Picture= d:ha inan zhiwu.bmp D. Picture1.Picture=LoadPicture（d:hai nan zhiwu.bmp 21. 如果要在窗体代码编辑器的”通用”部分定义私有Sub过程,则正确的语句是（

7、。A. Public SubB. Private SubC. Public Fun ctionD. Private Function22. 在代码编辑器中，如果一条语句太长，无法在一行内写下（不包括注释,要折行书写，可以在行末使用续行字符（，表示下一行是当前行的继续。A. 直接回车B. 个下划字符”C. 一个空格加一个下划字符”D. 个空格加一个连字符（-23. 下列叙述不正确的是（。A. 注释语句是非执行语句，仅对程序的有关内容起注释作用，客观存在不被解释 和编译B. 注释语句可以放在代码中的任何位置C. 注释语句不能放在代码中的任何位置D. 代码中加入注释语句的目的是提高程序的可读性24.

8、 VB程序中通常不会产生错误提示的是（。A. 编译错误B. 实时错误C. 运行时错误D. 逻辑错误25. ADO对象模型含有七种对象，其中代表数据库表中的一整套记录或执行一条 命令而得到的结果的对象是（。A. Comma ndB. Co nn ectio nC. RecordsetD. Field26使用ADO模型时，建立Recordset和 Conn ection对象的连接的属性是（。A. ExecuteB. Comma ndTypeC. Ope nD. ActiveC onnection27. 要发送数据，通常使用Win sock控件的（。A. Se ndData 方法B. Listen

9、方法CA ccept 方法D. GetDate 方法28. 下列只能用程序代码设置，不能通过属性窗口设置的属性是（。A. Drive 属性B. Pattern 属性C. Visible 属性D. I ndex 属性二、填空题1. 每个应用程序必须有一个惟一的文件2. 欲设置定时器的时间间隔为1秒,则属性Interval的值为。3. 表达式5 + 21 2 * 3 Mod 2的值是。4. 表达式5 + 9 Mod 2八3 + 2的值是。5. 列表框中项目的序号是从开始的。6. 计时器控件响应的事件是。7. 为了在运行时把当前路径下的图形文件pictureflower.jpg装入图片框Pictur

10、el, 所使用的语句为。8. 执行赋值语句a = abc + def,变量a的值是。9. VB中的程序错误类型主要有编译错误、等三种。10. 在VB中，将Foxpro称为外部数据库，Access称为,SQL Server称为。11. 数据库应用程序属于一种非常典型的前后台软件结构，而前后台之间进行通信的主要机制称为。12. 若窗体Form1左上角坐标为（0,600右下角的坐标为（800,-200。则X轴的正 向向，丫轴的正向向。13. 用Dim A（3,3语句声明二维数组后，数组A的元素共有个。14. 设某个程序中要用到一个二维数组，要求数组名为A,类型为字符串类型，第一 维下标从1到3,第二

11、维下标从0到3,则相应的数组声明语句为。15. 果不适先确定变量的数据类型，则可以把它声明为变量。16. tretch属性设置为时，图像框可自动改变大小以适应其中的图形。17.i nsock1丄isten语句的含义是。三、阅读程序题阅读下列程序并写出程序运行结果1.Private Sub Form_Click(Static a As Stri ngDim b As Stri nga = a + Ab = b + BText1 = aText2 = bEnd Sub写出程序运行时连续单击三次窗体后，文本框Text1和Text2显示结果2.Private Sub Form_Click(Static

12、 Sum As In tegerFor i = 1 To 4Sum = Sum + iNext iPrint SumEnd Sub，变量Sum的值。写出程序运行时点击窗体两次后3.Private Sub Comma nd1_Click(Dim A(1 To 5 As In tegerDim x As In tegerFor i = 1 To 5A(i = iNext ii = 1Do While x 3 Thenc = c + 5Exit ForElsek = k + 5End IfNext jPrint c, kEnd Sub写出程序运行时单击窗体后，Form1上的输出结果5.Private

13、 Sub Comma nd1_Click(Dim X As In teger, Y As In tegerFor i = 1 To 4Forj = 1 To iY = Y + jNext jX = X + YNext iPrint XEnd Sub写出程序运行时单击命令按钮后，窗体Form1上的输出结果6.Private Sub Comma nd1_Click(Dim A(1 To 5 As In tegerDim b As In tegerFor b = 1 To 5A(b = bNext bText1.Text = A(b - 2End Sub写出程序运行时单击Command1后,文件框T

14、extl中的输出结果7.Function F(a As In teger, b As In teger As In tegerF = a + bEnd FunctionPrivate Sub Form_Click(Dim a As In teger, b As In teger, z As In tegera = 4:b =5z = F(a, bPrint zEnd Sub写出程序运行时单击窗体后，Form1上的输出结果8.Function F(a As In tegerDim b As In tegerStatic c As In tegerb = b + 2End FunctionPriv

15、ate Sub Comma nd1_Click(Dim a As In tegera = 4Fori = 1 To 3Print F(aNext iEnd Sub写出程序运行时，单击命令按钮在窗体上的输出结果。四、完善程序题1.假设用Access创建了一个名为 学生.MDB的数据库，并在其中创建了一张名 为学生基本情况”的数据表,表中存放了学生的基本信息，如图1所示。现在要求利用VB编写一个数据库查询程序，程序的运行界面如图2所示，基本 逻辑是:首先文本框(Text1中输入希望查询的学生学号，然后点击查询”按钮 (Command1如果数据库中存在该学号，则分别在Text2、Text3、Text

16、4中显示学号、 姓名、籍贯信息，否则提示用户 记录不存在”并使Text1获得焦点，要求用户重新输 入。当点击退出按钮(Command2时关闭本窗体。图1用Access创建的学生基本情况数据表图2查询程序运行界面 程序如下，请补充完整。Private ADOc n As Co nn ectionPrivate Sub Form_Load(1学生.MDB End SubPrivate Sub Comma nd1_Click(Dim strSQL As Stri ngDim ADOrs As 3 RecordsetADOrs.ActiveCo nn ection = 4strSQL = Select

17、 * From 学生基本情况 Where 学号=+ If Not ADOrs.EOF The nText2 = ADOrs.Fields(学号Text3 = ADOrs.Fields(姓名Text4 = ADOrs.Fields(籍贯ElseMsgBox 要查询的学号不存在，请重新输入!, vbOKOnly,Text1 =Text1.SetFocusEnd IfEnd SubPrivate Sub Comma nd2_Click(Un Load MeEnd+ Text1 + 信息提示2列表框应用程序要求从文本框中输入课程名称，然后按 添加”按钮,将该课程名程添加到列表框 中;当选择列表框中某一

18、项后，按 删除”按钮,则从列表框中删除该项；当选择列表框中 某一项后，按 修改”按钮,把列表框中选取的项送往文本框且修改”按钮变为 修改确认”在文本框的内容修改好后，按修改确认”按钮，再把文本框中修改后的信息送到 列表框且 修改确认”按钮变为 修改”程序运行结果如图3所示。TextlListlComma nd1Comma nd2Comma nd3图3程序如下，请补充完整。Private Sub Form_Load(Listl.Addltem V isual Basic 程序设计Listl.Addltem SQL SERVER 数据库应用Listl.Addltem 信息管理系统Listl.Add

19、ltem ERP 原理与应用Listl.Addltem 网络实用技术基础Listl.Addltem 系统开发规范与文档编写Listl.Addltem 信息系统测试End SubPrivate Sub Comma nd1_Click(If Textl.Text Then1 Text1.Text 将文本框中的内容加到列表框中Text1.Text =2MsgBox 请在文本框中输入信息！End IfEnd SubPrivate Sub Comma nd2_Click(3 List1.ListIndex 删除选定的项目End SubPrivate Sub Comma nd3_Click(If Comm

20、a nd3.Captio n = 4 The nText1.Text = 5Text1.SetFocusComma nd1.E nabled = FalseComma nd2.E nabled = FalseCommand3.Caption =修改确认ElseListl. List(List1.List In dex = Textl.TextComma ndl.E nabled = TrueComma nd2.E nabled = TrueTextl.Text =Comma nd3.C aptio n =修改End IfEnd Sub五、编写程序题编写一工资调整程序。若基本工资大于等于2000

21、元，增加工资20%,若小于1800元大于1300元，则增加工资15%;若小于1300元则增加工资10%。要求在文本 框Text1中输入某职工的基本工资，单击 计算”按钮，在标签框Label1中输出增加后 的工资。程序运行界面如图4所示。2. 请根据下列描述编写购物优惠程序。某商场为了加速促成商品流通，采用购物 打折的优惠办法，每位顾客一次购物（1在200元以上者,按九五折优惠;（2在400元以 上者，按九折优惠；（3800元以上者，按八折优惠。在窗体上添加两个文本框和一个命 令按钮，要求在Textl中输入购物商品总金额,单击命令按钮，在Text2中输出优惠 价。程序运行结果如图5所示。图5答案

22、：一、单项选择题1. C2. B3. B4. D5. A6. D7. C8.B9.C 10.C 11.B 12.D 13.B 14.A 15.C 16.C 17.C 18.D 19.C 20.D 21.B 22.C 23.C 24.D 25.C 26.D 27.A 28.A二、填空题1.vbp2.10003.64.85.06. Timer7. Picture1. Picture = LoadPrctureCpictureflower.jpg8. abcdef9. 实时错误逻辑错误10. 本地数据库远程数据库11数据库引擎12右上13.1614. Dim A(1To 3,0To 3 As Stri ng15