VB程序设计期末复习题.docx

1、VB程序设计期末复习题Visual Basic程序设计期末复习题一、单项选择题1Visual Basic是一种面向对象的可视化编程语言，采取了（ ）的编程机制。A按过程顺序执行 B从主程序开始执行 C事件驱动 D按模块顺序执行2与传统的设计语言相比，Visual Basic最突出的特点是（ ）A程序开发环境 B结构化程序设计 C程序调试技术 D事件驱动的编程机制3将调试通过的工程经“文件”菜单的“生成.exe文件”编译成.exe后，将该可执行文件拿到其它机器上不能运行的主要原因是（ ）。A缺少.frm窗体文件 B该可执行文件有病毒 C运行的机器上无VB系统 D以上原因都不对4. Visual

2、Basic6.0集成开发环境有三种工作模式，下列不属于三种工作模式之一的是（ ）。A设计模式 B编写代码模式 C执行模式 D中断模式 5后缀为.bas的文件表示（）。A工程文件 B窗体文件C窗体二进制数据文件 D标准类模块文件 6工程文件的扩展名是（ ）。A.vbp B.frm C.bas D.frx7刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是（ ）。A时钟控件 B图像框 C框架 D通用对话框8.以下叙述中错误的是（ ）。 A一个工程中可以包含多个窗体文件 B在设计Visual Basic程序时，窗体、标准模块、类模块等需要分别保存为不同类型的文件 C在一个窗体文件中用Priva

3、te定义的通用过程能被其它窗体调用 D全局变量必须在标准模块中定义9要在窗体Form1内显示“欢迎您！”，使用的语句是（ ）AForm.caption=欢迎您! BForm1.caption=欢迎您!CForm. print 欢迎您! DForm1.print 欢迎您! 10决定标签内显示内容的属性是（ ） AName BText CCaption DAlignment11要设置命令按钮的背景图形，必须设置的两个属性是（ ）ACaption和Picture BStyle和PictureCStyle和Icon DValue和Icon12将数据项“China”添加到列表框List1中成为第一项，应

4、使用的语句是（ ）AList1.AddItemChina BList1.AddItem1,ChinaCList1.AddItemChina,0 DList1.AddItemChina,113在VB中，下列各项合法的变量名是（ ）。 AInteger Bab-c C2abc D a_bc 14在VB中，下列合法的变量名是（ ）A4EF Binteger CE-F DE_F15如果要在文本框中键入字符时，只显示某个字符，如星号（*），应设置文本框的（ ）属性。 APasswordChar B Caption CText DLocked16要使窗体在运行时不可改变窗体的大小和没有最大化和最小化按钮，

5、只要对下列（ ）属性设置就有效。AMaxButton BBorderSyle CWidth DMinButton17下列控件中不能响应Click事件的是（ ）。ATextBox BTimer CLabel DListBox18有程序代码如下： Text1.Text = 欢迎学习VB程序设计则Text1，Text ，和欢迎学习VB程序设计分别代表（ ）。A对象，值，属性 B对象，属性，值 C对象，方法，属性 D属性，对象，值 19设a=”Visual Basic”，下面使b=”Basic”的语句是（）。Ab=left(a,8,12) Bb=mid(a,8,5)Cb=right(a,5,5) Db

6、=left(a,8,5) 20确定一个控件在窗体上位置的属性是（ ）A Top或Left BTop和LeftCWidth或Height DWidth和Height 21执行Form1.Scale (0, 10)-(10, -10)语句后，Form1窗体坐标系x轴和y轴的正方向是（ ）。A向右和向上 B向左和向下 C向右和向下 D向左和向上22如果希望以模态方式显示窗体Form1，下列正确的语句是（ ）AForm1.Show 0 BForm1.Show 1CForm1.Show D以下都不正确23改变驱动器列表框的Drive属性值，将激活（）事件。AKeyDown BKeyUp CScoll D

7、Change24多窗体程序是由多个窗体组成，在缺省情况下，VB在应用程序执行时，总是把（ ）指定为启动窗体。A不包含任何控件的窗体 B命名为Frm1的窗体C包含控件最多的窗体 D设计时的第一个窗体25Dim A(1 To 4,0 To 3)定义的数组包含的元素的个数是（ ）。 A12 B16 C15 D动态变化 26如果创建了命令按纽控件数组，则Click事件的参数是（ ）。ACaption BIndex CTag D没有参数27如果准备向随机文件中写入数据，正确的语句是（ ）AWrite # 1,rec BPrint # 1,recCGet # 1,rec DPut # 1,rec 28.要

8、以读方式打开D盘的一个顺序文件 Test.doc，应使用的语句是（ ）AOpen Test.doc For Output As #1 BOpen D: Test.doc For Input As #1COpen D: Test.doc For Output As #1 DOpen Test.doc For Input As #1 29.以下属性只能用程序代码设置，不能通过属性窗口设置的是（ ）。AIndex属性 BPattern属性 CVisible属性 DDrive属性30以下有关Visual Basic语言描述中错误的是（ ）。A语句是一行一句，以回车键结束 B用“,”分隔一行中的多个语句

9、 C不区分大小写D一条语句放在多行中，则在前一行结束处使用续行符“_”连接下一行31不属于VB数据库引擎的是（）AODBC BJet引擎 COLE DB D BDE32.使用ADO对象模型时，使Recordset和Connection对象建立连接的属性是（ ）。 AOpen BExecute CCommandType DActiveConnection33用来从数据库表中删除记录的SQL命令是（ ）。Awhere Bselect Cupdate Ddelete 34VB程序中通常不会产生错误提示的是（）。A编译错误B逻辑错误C运行时错误D实时错误35 在VB程序中逐语句调试的键是（）。AF8键

10、 BF9键CCtrlF8键DCtrlF9键36当Winsock控件处于侦听状态时，其State属性的值是（）A0 B1 C2 D3 37要发送数据，通常使用Winsock控件的（）AListen BAccept CSendData DGetData38. 下列叙述不正确的是（ ）。A.注释语句是非执行语句，仅对程序的有关内容起注释作用，客观存在不被解释和编译 B.注释语句不能放在代码中的任何位置 C.注释语句可以放在代码中的任何位置 D.代码中加入注释语句的目的是提高程序的可读性 39ADO对象模型含有七种对象，其中用于建立一个和数据源的连接的对象是（ ）。 ACommand BConnect

11、ion CRecordset DField40ADO对象模型含有七种对象，其中代表数据库表中的一整套记录或执行一条命令而得到的结果的对象是（ ）。 A.Command B.Connection C.Recordset D.Field二、填空题1.每个应用程序必须有一个唯一的 文件，至少有一个 文件。2表达式132-23*5 MOD 6的值是 。3如果要每隔3s产生一个Timer事件，则Interval属性应设置为 。 4VB中的程序错误类型主要有实时错误、 、 三种。5. 控件数组的名字由 属性指定，而数组中的每个元素由 属性决定。6用Dim A(4,4)语句声明二维数组后，数组A的元素共有

12、个。7设某个程序中要用到一个二维数组，要求数组名为R，类型为整型，第一维下标从-2到2，第二维下标从0到4，则相应数组声明语句为 。8某个程序中要用到一个二维数组，要求数组名为C，类型为整型，第一维下标从-1到3，第二维下标从0到4，则相应数组声明语句为 。9过程级变量是指在 声明的变量，窗体级或模块级变量是指窗体或模块的代码声明段用 或 声明的变量，在全局变量在整个应用程序中有效，一般在标准模块中使用 语句声明。10在Visual Basic语言中有三种形式的循环结构。其中，若循环的次数可以适先确定，可使用For?Next循环循环；若要求先判断循环进行的条件，可使用 循环。 11为了在运行时

13、把当前路径下的图形文件flower.jpg装入图片框P1，所使用的语句为 。12. 将图片框的AutoSize属性设置成 时，可使图片框根据图片调整大小。13Winsock控件主要用来编制基于TCP/IP或 协议的网络应用程序。如果希望得到本地计算机的 IP地址，可以使用Winsock控件的 属性。14Winsock控件主要用来编制基于 或 协议的网络应用程序。15如果不能事先确定变量的数据类型，则可以把它声明为 类型。16以写方式打开D盘中的 Text.dat文件，正确的语句是 17列表框中项目的序号是从 开始的。 18执行赋值语句y = “abc”+”def”后，变量y的值是 。19全局变

14、量是指那些在 中有效的变量，一般在模块代码编辑器的顶部使用 声明。20VB中参数传递的机制有两种，一种是 参数，另一种是 参数。21闰年的条件是：年号（Y）能被4整除，但不能被100整除；或者年号能被400整除。表示该条件的逻辑表达式是 。22若窗体的左上角坐标为（-250，250），右下角坐标为（300，0），则X轴的正向向 ，Y轴的正向向 。23在VB中，将Access称为 ，SQL Server称为 ，Foxpro称为 。24数据库应用程序属于一种非常典型的前后台软件结构，前后台之间进行通讯的主要机制称为 。25常用的VB网络编程控件主要有 、 和 三种。26通常可以将文本框控件的 属性

15、设置为False，以禁止键盘输入。如果不希望某个控件获得焦点，则可以将它的 属性设置为False。27VB应用程序可分为单窗体、多窗体和 。28若窗体Form1左上角坐标为（0，600），右下角的坐标为（800，-200）。则X轴的正向向 ，Y轴的正向向 。29数据库应用程序属于一种非常典型的前后台软件结构，而前后台之间进行通信的主要机制称为 。30VB中将数据库分为本地数据库、 和 三种类型。三、阅读程序题阅读下列程序并写出程序运行结果1Private Sub Form_Click() Dim x As Integer Static y As Integer x = x + 2 y = y

16、+ 3 Form1.Print x=; x, y=; yEnd Sub写出程序运行时连续单击三次窗体后，Form1上的输出结果。2Private Sub Command1_Click() x = 0 Do While x 3 Then k = k + 4 Exit For Else k = k + 3 End If Next iPrint i, kEnd Sub写出程序运行时单击窗体后，Form1上的输出结果。6. Private Sub Command1_Click() Dim s As Double Dim i As Integer s = 6 i = 2 Do While i 3 The

17、n c = c + 6 Exit For Else k = k + 2End IfNext jPrint c, kEnd Sub 写出程序运行时单击窗体后，c,k的值分别是：9. (6分)Private Sub Command1_Click() Dim s As Double Dim i As Integer s = 5 i = 1 Do While i 8 i = i + 2 s = s + i Loop Text1.Text = s End Sub文件框Text1的输出结果是10. (7分)Sub test(i As Integer) i = i + 4End SubPrivate Sub

18、 form_Click() Dim x As Integer x = 5 Print x=; xCall test(x)Print x=; xEnd Sub写出程序运行后，单击窗体时程序的运行结果。四、完善程序题1列表框应用程序。要求从文本框中输入课程名称，然后按“添加”按钮，将该课程名程添加到列表框中；当选择列表框中某一项后，按“删除”按钮，则从列表框中删除该项；当选择列表框中某一项后，按“修改”按钮，把列表框中选取的项送往文本框且“修改”按钮变为“修改确认”。在文本框的内容修改好后，按“修改确认”按钮，再把文本框中修改后的信息送到列表框且“修改确认”按钮变为“修改”。程序运行结果如图1所示

19、。 图 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 SubPrivate Sub Command1_Click() If Text1.Text Then 1 将文本框中的内容加到列表框中 Text1.Text = 2

20、 MsgBox 请在文本框中输入信息！ End IfEnd SubPrivate Sub Command2_Click() 3 删除选定的项目End SubPrivate Sub Command3_Click() If Command3.Caption = 4 Then Text1.Text = 5 Text1.SetFocus Command1.Enabled = 6 Command2.Enabled = False Command3.Caption = 7 Else List1.List(List1.ListIndex) = Text1.Text Command1.Enabled = Tr

21、ue Command2.Enabled = True Text1.Text = Command3.Caption = 8 End IfEnd Sub2已知存在一名为“学生”的SQL Server数据库，其中的“students”数据表用来存储学生的基本情况信息，包括学号、姓名、籍贯、性别。请编写一个简单的应用程序，向students表中添加学生记录。程序的基本逻辑是：当窗体被加载时，程序联接SQL Server数据库；当点击“增加”按钮时，首先查询学号是否重复，如果不重复则向students表中添加学生记录。其运行界面如下图所示。图1程序如下，请补充完整。声明对象变量ADOcn，用于创建与数据

22、库的连接Private ADOcn As ConnectionPrivate Sub Form_Load()连接SQL Server数据库Dim strDB As StringstrDB = Provider=SQLOLEDB;LSF;User ID=sa;Password=;Database = 1 If ADOcn Is Nothing Then Set ADOcn =2 3 End IfEnd SubPrivate Sub Command1_Click()增加学生记录Dim strSQL As StringDim ADOrs As 4 ADOrs. 5 =ADOcnADOrs.Open

23、“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 IfPrivate Sub Command2_Click()Unload MeEnd Sub3假设用Ac

24、cess创建了一个名为“学生.MDB”的数据库，并在其中创建了一张名为“学生基本情况”的数据表，表中存放了学生的基本信息，如图1所示。现在要求利用VB编写一个数据库查询程序，程序的运行界面如图2所示，基本逻辑是：首先文本框(Text1)中输入希望查询的学生学号，然后点击“查询”按钮(Command1)，如果数据库中存在该学号，则分别在Text2、Text3、Text4中显示学号、姓名、籍贯信息，否则提示用户“记录不存在”并使Text1获得焦点，要求用户重新输入。当点击退出按钮(Command2)时关闭本窗体。图1用Access创建的学生基本情况数据表图2 查询程序运行界面程序如下，请补充完整。Private ADOcn As ConnectionPrivate Sub Form_Load() 1 2 End SubPrivate Sub Command1_Click() Dim strSQL As String Dim ADOrs As 3 Recordset ADOrs.ActiveConnection = ADOcn strSQL = Select * From 学生基本情况 Where 学号= + + Text1 + 4 If 5 ADOrs.EOF Then Text2 = ADOrs.Fields(学号) Text3 = ADOrs.Fie