2022年Basic程序设计期末复习题..docx

《2022年Basic程序设计期末复习题..docx》由会员分享，可在线阅读，更多相关《2022年Basic程序设计期末复习题..docx（32页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。

1、名师归纳总结 精品学习资料 - - - - - - - - - - - - - - -学习必备 欢迎下载Visual Basic一、单项挑选题程序设计期末复习题1Visual Basic是一种面对对象的可视化编程语言,实行了（）的编程机制；A按过程次序执行B从主程序开头执行C大事驱动D按模块次序执行2与传统的设计语言相比,Visual Basic最突出的特点是（A程序开发环境B结构化程序设计C程序调试技术D大事驱动的编程机制3将调试通过的工程经“ 文件” 菜单的“ 生成.exe 文件” 编译成 .exe 后,将该可执行文件拿到其它机器上不能运行的主要缘由是（）；A缺少 .frm 窗体文件 B该

2、可执行文件有病毒C运行的机器上无 VB系统 D以上缘由都不对4. Visual Basic6.0 集成开发环境有三种工作模式,以下不属于三种工作模式之一的是（）；A设计模式 B编写代码模式C执行模式 D中断模式5后缀为 .bas 的文件表示（）；A工程文件 B窗体文件C窗体二进制数据文件 D标准类模块文件6工程文件的扩展名是（）；A.vbp B.frm C.bas D.frx 7刚建立一个新的标准 EXE工程后,不在工具箱中显现的控件是（）；A时钟控件 B图像框 C框架 D通用对话框8. 以下表达中错误选项（）； A 一个工程中可以包含多个窗体文件B在设计 Visual Basic 程序时,窗

3、体、标准模块、类模块等需要分别储存为不同类型的文件C在一个窗体文件中用Private定义的通用过程能被其它窗体调用D全局变量必需在标准模块中定义细心整理归纳 精选学习资料 9要在窗体Form1 内显示“ 欢迎您！ ” ,使用的语句是（）欢迎您 . 第 1 页,共 19 页 AForm.caption=欢迎您 . BForm1.caption= - - - - - - - - - - - - - - - - - - - - - - - - 名师归纳总结 精品学习资料 - - - - - - - - - - - - - - -CForm. print 学习必备欢迎下载欢迎您 . 欢迎您 . DFo

4、rm1.print 10打算标签内显示内容的属性是（） A Name BText CCaption DAlignment 11要设置命令按钮的背景图形,必需设置的两个属性是（）ACaption 和 Picture BStyle 和 Picture CStyle 和 Icon DValue 和 Icon 12将数据项“China ” 添加到列表框 List1 中成为第一项,应使用的语句是（）AList1.AddItemChina CList1.AddItemChina,0 BList1.AddItem1,China DList1.AddItemChina,1 13在 VB中,以下各项合法的变量名

5、是（）； AInteger Bab-c C2abc D a_bc 14在 VB中,以下合法的变量名是（）A4EF Binteger CE-F DE_F 15假如要在文本框中键入字符时,只显示某个字符, 如星号（* ）,应设置文本框的 （）属性； A PasswordChar B Caption CText DLocked 16要使窗体在运行时不行转变窗体的大小和没有最大化和最小化按钮,只要对以下（）属性设置就有效；ListBox AMaxButton BBorderSyle CWidth DMinButton 17以下控件中不能响应Click大事的是（）；ATextBox BTimer CLa

6、bel D18有程序代码如下：细心整理归纳 精选学习资料 Text1.Text = 欢迎学习 VB程序设计 ）； 第 2 页,共 19 页 就 Text1 ,Text ,和 欢迎学习 VB程序设计 分别代表（A对象,值,属性 B对象,属性,值）；C对象,方法,属性 D属性,对象,值19设 a=” Visual Basic” ,下面使b=” Basic ” 的语句是（Ab=lefta,8,12 Bb=mida,8,5 Cb=righta,5,5 Db=lefta,8,5 20确定一个控件在窗体上位置的属性是（）A Top 或 Left B Top 和 Left - - - - - - - - -

7、 - - - - - - - - - - - - - - - 名师归纳总结 精品学习资料 - - - - - - - - - - - - - - -CWidth 或 Height D学习必备欢迎下载 Width 和 Height 21执行 Form1.Scale 0, 10-10, -10 语句后, Form1 窗体坐标系 x 轴和 y 轴的正方向是（）；A向右和向上 B向左和向下C向右和向下 D向左和向上22假如期望以模态方式显示窗体 Form1,以下正确的语句是（）AForm1.Show 0 BForm1.Show 1 CForm1.Show D以下都不正确23转变驱动器列表框的 Driv

8、e 属性值,将激活（）大事；AKeyDown BKeyUp CScoll DChange 24多窗体程序是由多个窗体组成,在缺省情形下, VB在应用程序执行时, 总是把（）指定为启动窗体；A不包含任何控件的窗体 B命名为 Frm1 的窗体C包含控件最多的窗体 D设计时的第一个窗体25Dim A1 To 4,0 To 3 定义的数组包含的元素的个数是（）； A12 B16 C15 D动态变化26假如创建了命令按纽控件数组,就 Click 大事的参数是（）；ACaption BIndex CTag D没有参数27假如预备向随机文件中写入数据,正确的语句是（）AWrite # 1,rec BPrin

9、t # 1,rec CGet # 1,rec DPut # 1,rec 28. 要以读方式打开 D盘的一个次序文件 Test.doc,应使用的语句是（）AOpen Test.doc For Output As #1 BOpen D: Test.doc For Input As #1 COpen D: Test.doc For Output As #1 DOpen Test.doc For Input As #1 29. 以下属性只能用程序代码设置,不能通过属性窗口设置的是（）；AIndex 属性 BPattern 属性 CVisible 属性 DDrive 属性30以下有关 Visual Ba

10、sic 语言描述中错误选项（）；A语句是一行一句,以回车键终止细心整理归纳 精选学习资料 B用“, ” 分隔一行中的多个语句 第 3 页,共 19 页 - - - - - - - - - - - - - - - - - - - - - - - - 名师归纳总结 精品学习资料 - - - - - - - - - - - - - - -学习必备 欢迎下载C不区分大小写D一条语句放在多行中,就在前一行终止处使用续行符“_” 连接下一行31不属于 VB数据库引擎的是（）AODBC BJet 引擎 COLE DB D BDE 32. 使用 ADO对象模型时,使 Recordset 和 Connectio

11、n 对象建立连接的属性是（）； A Open BExecute CCommandType DActiveConnection 33用来从数据库表中删除记录的 SQL命令是（）；A where Bselect Cupdate Ddelete 34VB程序中通常不会产生错误提示的是（）；A编译错误 B规律错误C运行时错误 D实时错误35 在 VB程序中逐语句调试的键是（）；AF8 键 BF9 键CCtrlF8 键 DCtrlF9 键36当 Winsock 控件处于侦听状态时,其 State 属性的值是（）A0 B1 C2 D 3 37 要发送数据,通常使用 Winsock 控件的（）AListen

12、 BAccept CSendData DGetData 38. 以下表达不正确选项（）；A. 注释语句是非执行语句,仅对程序的有关内容起注释作用,客观存在不被说明和编译B. 注释语句不能放在代码中的任何位置C.注释语句可以放在代码中的任何位置D.代码中加入注释语句的目的是提高程序的可读性39ADO对象模型含有七种对象,其中用于建立一个和数据源的连接的对象是（）；ACommand BConnection CRecordset DField 40ADO对象模型含有七种对象,其中代表数据库表中的一整套记录或执行一条命令而得到的结果的对象是（）；A.Command B.Connection C.Rec

13、ordset D.Field 二、填空题细心整理归纳 精选学习资料 1. 每个应用程序必需有一个唯独的文件,至少有一个文件； 第 4 页,共 19 页 - - - - - - - - - - - - - - - - - - - - - - - - 名师归纳总结 精品学习资料 - - - - - - - - - - - - - - -2表达式 132-23*5 MOD 6学习必备欢迎下载；的值是3假如要每隔3s 产生一个Timer 大事,就Interval属性应设置为三种；4VB中的程序错误类型主要有实时错误、属性5. 控件数组的名字由属性指定, 而数组中的每个元素由打算；6用 Dim A4,4

14、 语句声明二维数组后,数组 A 的元素共有 个；7设某个程序中要用到一个二维数组,要求数组名为 R,类型为整型,第一维下标从-2到 2,其次维下标从 0 到 4,就相应数组声明语句为；8某个程序中要用到一个二维数组,要求数组名为 C,类型为整型,第一维下标从-1 到3,其次维下标从 0 到 4,就相应数组声明语句为；9过程级变量是指在声明的变量,窗体级或模块级变量是指窗体或模块的代码声明段用或声明的变量, 在全局变量在整个应用程序中有效,一般在标准模块中使用语句声明；10在 Visual Basic 语言中有三种形式的循环结构；其中,如循环的次数可以适先确定,可使用 For Next 循环循环

15、；如要求先判定循环进行的条件,可使用 循环 ；11为了在运行时把当前路径下的图形文件 flower.jpg 装入图片框 P1,所使用的语句为；12. 将图片框的 AutoSize 属性设置成 时,可使图片框依据图片调整大小；13Winsock 控件主要用来编制基于 TCP/IP 或 协议的网络应用程序；假如期望得到本地运算机的 IP 地址,可以使用 Winsock 控件的 属性；14Winsock 控件主要用来编制基于 或 协议的网络应用程序；15假如不能事先确定变量的数据类型,就可以把它生命为 类型；16以写方式打开 D盘中的 Text.dat 文件,正确的语句是17列表框中项目的序号是从

16、开头的；18执行赋值语句 y = “ abc” +” def ” 后,变量 y 的值是；19全局变量是指那些在中有效的变量, 一般在模块代码编辑器的顶部使用 声明；20VB中参数传递的机制有两种,一种是 参数,另一种是参数；21闰年的条件是： 年号（Y）能被 4 整除, 但不能被 100 整除； 或者年号能被 400 整除；表示该条件的规律表达式是；22如窗体的左上角坐标为（-250 ,250）,右下角坐标为（300, 0）,就 X 轴的正向向,Y轴的正向向；23在 VB中,将 Access 称为,SQL Server 称为,Foxpro称为；24数据库应用程序属于一种特别典型的前后台软件结构

17、,前后台之间进行通讯的主要机制称为；、和25常用的 VB网络编程控件主要有三种；26通常可以将文本框控件的 属性设置为 False ,以禁止键盘输入；假如不期望某个控件获得焦点,就可以将它的 属性设置为 False ；27VB应用程序可分为单窗体、多窗体和；28如窗体 Form1 左上角坐标为（0,600）,右下角的坐标为（800,-200 ）；就 X 轴的正向向,Y轴的正向向；29数据库应用程序属于一种特别典型的前后台软件结构,而前后台之间进行通信的主细心整理归纳 精选学习资料 - - - - - - - - - - - - - - - 第 5 页,共 19 页 - - - - - - -

18、- - 名师归纳总结 精品学习资料 - - - - - - - - - - - - - - -要机制称为；学习必备欢迎下载30VB中将数据库分为本地数据库、和三种类型；三、阅读程序题阅读以下程序并写出程序运行结果 1Private Sub Form_Click Dim x As Integer Static y As Integer x = x + 2 y = y + 3 Form1.Print x=; x, y=; y End Sub 写出程序运行时连续单击三次窗体后,2Private Sub Command1_Click x = 0 Do While x 3 Then k = k + 4

19、Exit For Else k = k + 3 End If Next i Print i, k 细心整理归纳 精选学习资料 - - - - - - - - - - - - - - - 第 7 页,共 19 页 - - - - - - - - - 名师归纳总结 精品学习资料 - - - - - - - - - - - - - - -学习必备 欢迎下载End Sub 写出程序运行时单击窗体后,Form1 上的输出结果；6. Private Sub Command1_Click Dim s As Double Dim i As Integer s = 6 i = 2 Do While i 3 Th

20、en 细心整理归纳 精选学习资料 - - - - - - - - - - - - - - - 第 8 页,共 19 页 - - - - - - - - - 名师归纳总结 精品学习资料 - - - - - - - - - - - - - - -学习必备 欢迎下载 c = c + 6 Exit For Else k = k + 2 End If Next j Print c, k End Sub 写出程序运行时单击窗体后,c,k 的值分别是：9. 6 分 Private Sub Command1_Click Dim s As Double Dim i As Integer s = 5 i = 1

21、Do While i 8 i = i + 2 s = s + i Loop Text1.Text = s End Sub 文件框 Text1 的输出结果是10. 7 分 Sub testi As Integer i = i + 4 End Sub Private Sub form_Click Dim x As Integer x = 5 Print x=; x Call testx Print x=; x End Sub 写出程序运行后,单击窗体时程序的运行结果；细心整理归纳 精选学习资料 - - - - - - - - - - - - - - - 第 9 页,共 19 页 - - - - -

22、 - - - - 名师归纳总结 精品学习资料 - - - - - - - - - - - - - - -学习必备 欢迎下载四、完善程序题 1列表框应用程序；要求从文本框中输入课程名称,然后按“ 添加” 按钮,将该课程名 程添加到列表框中；当挑选列表框中某一项后,按“ 删除” 按钮,就从列表框中删除该项；当挑选列表框中某一项后,按“ 修改” 按钮,把列表框中选取的项送往文本框且“ 修改” 按 钮变为“ 修改确认”；在文本框的内容修改好后,按“ 修改确认” 按钮,再把文本框中修改后 的信息送到列表框且“ 修改确认” 按钮变为“ 修改”；程序运行结果如图 1 所示；Text1 List1 Comma

23、nd1 Command2 Command3 图 1 程序如下,请补充完整；Private Sub Form_Load List1.AddItem Visual Basic 程序设计 List1.AddItem SQL SERVER 数据库应用 List1.AddItem 信息治理系统 List1.AddItem ERP 原理与应用 List1.AddItem 网络有用技术基础 List1.AddItem 系统开发规范与文档编写 List1.AddItem 信息系统测试 End Sub Private Sub Command1_Click If Text1.Text Then 中 1 将文本框中

24、的内容加到列表框 Text1.Text = 2 MsgBox 请在文本框中输入信息！ End If End Sub Private Sub Command2_Click 细心整理归纳 精选学习资料 3 删除选定的项目 第 10 页,共 19 页 - - - - - - - - - - - - - - - - - - - - - - - - 名师归纳总结 精品学习资料 - - - - - - - - - - - - - - -学习必备 欢迎下载End Sub Private Sub Command3_Click If Command3.Caption = 4 Then Text1.Text =

25、5 Text1.SetFocus Command1.Enabled = 6 Command2.Enabled = False Command3.Caption = 7 Else List1.ListList1.ListIndex = Text1.Text Command1.Enabled = True Command2.Enabled = True Text1.Text = Command3.Caption = 8 End If End Sub 2已知存在一名为“ 同学” 的SQL Server 数据库,其中的“students ” 数据表用来存储同学的基本情形信息, 包括学号、姓名、籍贯、性

26、别；请编写一个简洁的应用程序,向 students表中添加同学记录；程序的基本规律是：当窗体被加载时,程序联接SQL Server 数据库；当点击“ 增加”按钮时, 第一查询学号是否重复,假如不重复就向students表中添加同学记录；其运行界面如下图所示；图 1 程序如下,请补充完整； 声明对象变量 ADOcn,用于创建与数据库的连接 Private ADOcn As Connection Private Sub Form_Load 连接 SQL Server 数据库 Dim strDB As String strDB = Provider=SQLOLEDB;LSF;User ID=sa;P

27、assword=;Database = 1 细心整理归纳 精选学习资料 - - - - - - - - - - - - - - - 第 11 页,共 19 页 - - - - - - - - - 名师归纳总结 精品学习资料 - - - - - - - - - - - - - - -学习必备 欢迎下载If ADOcn Is Nothing Then Set ADOcn =2 3 End If End Sub Private Sub Command1_Click 增加同学记录 Dim strSQL As String Dim ADOrs As 4 ADOrs. 5 =ADOcn “ADOrs.Op

28、en “ Select 学号 From Students Where 学号=” +”“ +Text1+” If Not 6 Then MsgBox “ 你输入的学号已存在,不能新增加！”Else StrSQL=” Insert Into students 学号, 姓名 , 籍贯 , 性别 , StrSQL=strSQL+Values ” +” “ +text1+ ” , “ +text2+ ” “ +text3+ ”, “ +text4+ ” ”ADOcn.Execute 7 MsgBox “ 添加胜利,请连续！”End If Private Sub Command2_Click Unload

29、 Me End Sub 3假设用 Access 创建了一个名为 “ 同学 .MDB” 的数据库, 并在其中创建了一张名为“ 学 生基本情形” 的数据表,表中存放了同学的基本信息,如图 1 所示；现在要求利用 VB编写一个数据库查询程序,程序的运行界面如图 2 所示,基本规律是：Command1,假如数 第一文本框 Text1 中输入期望查询的同学学号,然后点击“ 查询” 按钮据库中存在该学号,就分别在Text2 、Text3 、Text4 中显示学号、姓名、籍贯信息,否就提示用户“ 记录不存在”并使 Text1 获得焦点, 要求用户重新输入；当点击退出按钮Command2时关闭本窗体；图 1

30、用 Access 创建的同学基本情形数据表细心整理归纳 精选学习资料 - - - - - - - - - - - - - - - 第 12 页,共 19 页 - - - - - - - - - 名师归纳总结 精品学习资料 - - - - - - - - - - - - - - -学习必备 欢迎下载图 2 查询程序运行界面程序如下,请补充完整；Private ADOcn As Connection Private Sub Form_Load 1 ADOcn.Open Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c: 2 End Sub Private

31、 Sub Command1_Click Dim strSQL As String Dim ADOrs As 3 Recordset ADOrs.ActiveConnection = ADOcn strSQL = Select * From 4 同学基本情形 Where 学号 = + + Text1 + If 5 ADOrs.EOF Then Text2 = ADOrs.Fields 学号 Text3 = ADOrs.Fields 姓名 Text4 = ADOrs.Fields 籍贯 6 MsgBox 要查询的学号不存在,请重新输入., vbOKOnly, 信息提示 Text1 = 7 End

32、If End Sub Private Sub Command2_Click 8 End 细心整理归纳 精选学习资料 - - - - - - - - - - - - - - - 第 13 页,共 19 页 - - - - - - - - - 名师归纳总结 精品学习资料 - - - - - - - - - - - - - - -学习必备 欢迎下载五、编写程序题1编写一工资调整程序；如基本工资大于等于 800 元,增加工资 20%,如小于 800 元大于 600 元,就增加工资 15%；如小于 600 元就增加工资 10%；要求在文本框 Text1 中输入某职工的基本工资,单击“ 运算” 按钮,在标签框 图 4 所示；Label1 中输出增加后的工资；程序运行界面如图 2 2请依据以下描述编写购物优惠程序；某商场为了加速促成商品流通,采纳购物打折的优惠方法,每位顾客一次购物（1）在 100 元以上者,按九五折优惠；（2）在 200 元以上者,按九折优惠；（3）300 元以上者,按八折优惠； （4）500 元以上者按七折优惠；在窗体上添加 两个文本框和一个命令按钮,要求在 Text1 中输入购物商品总金额,单击命令按钮, 在 Text2 中输出优惠价；程序运行结果如图 2 所示；图 2 细心整理归纳 精选学习资料 - - - - - - - - - -