计算机二级VB模拟试题与答案（二） .doc

2014计算机二级VB模拟试题与答案（三）一、选择题1、以下关于MsgBox 的叙述中，错误的是()。A.MsgBox 函数返回一个整数B.通过MsgBox 函数可以设置信息框中图标和按钮的类型C.MsgBox 语句没有返回值D.MsgBox 函数的第二个参数是一个整数，该参数只能确定对话框中显示的按钮数量2、下列操作不能向工程中添加窗体的是()。A.执行"工程"菜单中的"添加窗体"命令B.单击工具栏中的"添加窗体"按钮C.右击窗体，在弹出的菜单中选择"添加窗体"命令D.右击工程资源管理器，在弹出的菜单中选择"添加"命令，然后在下一级菜单中选择"添加窗体"命令3、下列选项中不属于软件生命周期开发阶段任务的是()。A.软件测试B.概要设计C.软件维护D.详细设计4、表达式"4+5/6*7/8 Mod 9"的值是()。A.4B.5C.6D.75、数据库系统的核心是()。A.数据模型B.数据库管理系统C.数据库D.数据库管理员6、以下叙述中错误的是()。A.一个工程中可以包含多个窗体文件B.在一个窗体文件中用Private 定义的通用过程能被其他窗体调用C.在设计Visual Basic 程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件D.全局变量必须在标准模块中定义7、下列关于过程及过程参数的描述中，错误的是()。A.过程的参数可以是控件名称B.调用过程时使用的实参的个数应与过程形参的个数相同C.只有函数过程能够将过程中处理的信息返回到调用程序中D.窗体可以作为过程的参数8、有下列事件过程：Private Sub Co mmand1_Click()b =10Do Until b =-1a=InputBox("请输入a 的值")a=Val(a)b =InputBox("请输入b 的值")b =Va(b)a=a*bLoopPrint aEnd Sub程序运行后，依次输入数值30，20，10，-1后，输出结果是()。A.600B.-10C.200D.-60009、支持子程序调用的数据结构是()。A.栈B.树C.队列D.二叉树10、对关系S和R进行集合运算，结果中既包含S中的所有元组也包含R中的所有元组，这样的集合运算称为()。A.并运算B.交运算C.差运算D.积运算11、窗体上有1个名称为List1的列表框，其中已经输入了若干个项目，如图所示;还有2个文本框，名称分别为Text1、Text2，1个名称为Command1的命令按钮，并有下列事件过程。Private Sub Co mmand1_Click()Di mstr As Stri ng ，s As Stri ng ，k As Integers =Text1str =""For k =List1.ListCount -1To 0Step -1If InStr(List1.List(k)，s)>0Thenstr =str &List1.List(k)&""End IfNext kIf str =""ThenText2="没有匹配的项目" Else Text2=strEnd IfEnd Sub程序运行时，在Text1中输入"京"，单击命令按钮，则在Text2中显示的内容是()。A.京B.北京南京C.南京北京D.没有匹配的项目12、执行以下程序段后，变量c$的值为()。a$="Visual Basic Programi ng"b$="Quick"c$=b$&UCase(Mid$(a$，7，6)&Right$(a$，11)A.Visual BASICProgrami ngB.Quick Basic Programi ngC.QUICK Basic Programi ngD.Quick BASICProgrami ng13、刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是()。A.单选按钮B.图片框C.通用对话框D.文本框14、关于MDI 窗体，下列说法正确的是()。A.一个应用程序可以有多个MDI 窗体B.子窗体可以移到MDI 窗体以外C.不可以在MDI 窗体上放置按钮控件D.MDI 窗体的子窗体不可以拥有菜单15、在窗体(Name 属性为Form1)上画两个文本框(其Name 属性分别为Text1和Text2)和一个命令按钮(Name属性为Co mmand1)，然后编写如下两个事件过程：Private Sub Co mmand1_Click()a=Text1.Text +Text2.Text Print aEnd SubPrivate Sub Form_Load()Text1.Text ="" Text2.Text =""End sub程序运行后，在第一个文本框(Text1)和第二个文本框(Text2)中分别输入123和321，然后单击命令按钮，则输出结果为()。A.444B.321123C.123321D.13223116、在C盘当前文件夹下建立一个名为SDat .txt 的顺序文件。要求用InputBox 函数输入5名学生的学号(StuNo)、姓名(StuName)和英语成绩(StuEng)。则在下列横线处应填入的语句是()。Private Sub Form_Click()Open "C：SDat .txt"For Output As 1For i =1To 5StuNo =InputBox("请输入学号")StuName =InputBox("请输入姓名")StuEng =Val(InputBox("请输入英语成绩")Next iClose #1EndSubA.Input #l ，StuNo ，StuName ，StuEnB.Put #l ，StuNo ，StuName ，StuEnC.Write #1，StuNo ，StuName ，StuEnD.Get #1，StuNo ，StuName ，StuEn17、目录列表框Path 属性所表示的含义是()。A.当前驱动器或指定驱动器上的路径B.当前驱动器或指定驱动器上的某目录下的文件列表C.根目录下的文件列表D.指定路径下的文件列表18、有下列函数过程：Function Func2(a As Integer ，b As Integer)As IntegerStatic m As Integer ，i As Integerm=0i =2a=i +m+1b =i +a+bFunc2=mEnd Function在窗体上画一个命令按钮，然后编写下列事件过程：Private Sub Co mmandl_Click()Di m P As Integer ，k As Integer ，m As Integerk =4m=1P=Func2(k ，m)Print k ;mP=Func2(km)Print k =m End Sub程序运行后，单击命令按钮，输出结果是()。A.3 63 6B.3 63 11C.3 113 6D.3 113 1119、在设计阶段，当双击窗体上的某个控件时，所打开的窗口是()。A.工程资源管理器窗口B.工具箱窗口C.代码窗口D.属性窗口20、下列叙述菜单设计的语句正确的是()。A.菜单也是一个控件，存在于工具箱中B.菜单也有外观和行为的属性C.菜单设计在"菜单编辑器"中进行，因此它不是一个控件D.菜单的属性也是在"属性窗口"中设置的21、下列各控件不包含滚动条的控件是()。A.ListBoxB.Co mboBoxC.TextBoxD.Label22、要将名为MyForm 的窗体显示出来，正确的使用方法是()。A.MyForm.ShowB.Show.MyFormC.MyForm LoadD.MyFormShow23、在面向对象方法中，不属于"对象"基本特点的是()。A.一致性B.分类性C.多态性D.标识唯一性24、为了使列表框中的项目分为多列显示，需要设置的属性为()。A.ColumnsB.StyleC.ListD.Multi Select25、在窗体上有1个名称为Co mmonDialog1的通用对话框和1个名称为Co mmand1的命令按钮，以及其他一些控件。要求在程序运行时，单击Co mmand1按钮，则显示打开文件对话框，并在选择或输入了1个文件名后，就可以打开该文件。下列是Co mmand1_Click 事件过程的两种算法。算法1：Private Sub Co mmand1_Click()Co mmonDialogl .ShowOpenOpen Co mmonDialogl .File Name For Input As #1End Sub算法2：Private Sub Co mmand1_Click()Co mmonDialogl .ShowOpenIf Co mmonDialogl .File Name <>""ThenOpen Co mmonDialogl .File Name For Input As #1EndIfEnd Sub下列关于这两种算法的叙述中正确的是()。A.显示打开文件对话框后若未选择或输入任何文件名，则算法2会出错，算法1不会B.显示打开文件对话框后若未选择或输入任何文件名，则算法1会出错，算法2不会C.两种算法的执行结果完全一样D.算法1允许输入的文件名中含有空格，而算法2不允许26、下列叙述正确的是()A.算法的执行效率与数据的存储结构无关B.算法的空间复杂度是指算法程序中指令(或语句)的条数C.算法的有穷性是指算法必须能在执行有限个步骤之后终止D.以上3种描述都不对27、在窗体上画一个命令按钮，其名称为Commandl。程序运行后，单击命令按钮，输出结果是()。Private Sub pl (n As Integer)For i =n To 1Step =1x=Stri ng(i ，"*")Print xNext iEnd SubPrivate Sub Commandl_Click()pl(3)EndSubA.*B.*C.*D.*28、在窗体上画一个名称为Co mmand1的命令按钮，并编写以下程序：Private Sub Co mmand1_Click()Di mn %，b ，tt =1：b =1：n =2Dob =b*nt =t +bn =n +1Loop Until n >9Print tEnd Sub此程序计算并输出一个表达式的值，该表达式是()。A.9!B.10!C.1!+2!+9!D.1!+2!+10!29、在用通用对话框控件建立"保存"文件对话框时，如果需要指定文件列表框所列出的文件类型是文本文件(即.txt 文件)，则正确的描述格式是()。A."text (.txt)|(*.txt)"B."文本文件(.txt)|(.txt)"C."text(.txt)|(*.txt)"D."text(.txt)(*.txt)"30、有三个关系R、S 和T 如下：由关系R 和S 通过运算得到关系T，则所使用的运算为()。A.笛卡儿积B.交C.并D.自然连接31、对长度为n 的线性表进行顺序查找，在最坏情况下所需要的比较次数为()。A.log2nB.n/2C.nD.n+132、下列程序要求用户输入一个年份，并能够判断用户输入的年份是否是闰年，横线处应填()。Sub EnSure()Di myear As Integeryear =Val(InputBox("请输入年份：")If(year Mod 4=0_year Mod 100<>0)_(year Mod 400=0)ThenPrint "您输入的是闰年"ElsePrint "不是闰年，是普通年份"End IfEnd SubA.And AndB.And OrC.Or OrD.Or Or33、设有下列程序Private Sub Form_Click()x=50For i =1To 4y =InputBox("请输入一个整数")y =Val(y)If y Mod 5=0Thena=a+yx=yElsea=a+xEnd IfNext iPrint aEnd Sub程序运行后，单击窗体，在输入对话框中依次输入15、24、35、46，输出结果为()。A.100B.50C.120D.7034、要清除已经在图片框Picturel 中打印的字符串而不清除图片框中的图像，应使用语句()。A.Picture 1.ClsB.Picture 1.Picture =LoadPicture("")C.Picture 1.Pi nt""D.Picture 1.Picture""35、下列选项中不符合良好程序设计风格的是()。A.源程序要文档化B.数据说明的次序要规范化C.避免滥用goto语句D.模块设计要保证高耦合、高内聚36、下列说法错误的是()。A.窗体文件的扩展名为".frm"B.一个窗体对应一个窗体文件C.Visual Basic 中的一个工程只包含一个窗体D.Visual Basic 中一个工程最多可以包含255个窗体37、两个或两个以上模块之间关联的紧密程度称为()。A.耦合度B.内聚度C.复杂度D.数据传输特性38、假定在工程文件中有一个标准模块，其中定义了如下记录类型：Type BooksName As Stri ng*10TelNum As Stri ng*20End Type要求在执行事件过程Co mmand1_Click 时，在顺序文件Person .txt 中写入一条记录。下列能够完成该操作的事件过程是()。A.Private Sub Co mmand1_Click()Di nt BAs BooksOpen "c ：Person .txt"For Output As #1B .Name =InputBox("输入姓名")B .TelNum=InputBox("输入电话号码")Write #1，B.Name ，B.TelNumClose #1End SubB.Private Sub Co mmand1_Click()Di m BAs BooksOpen "c ：Person .txt"For Input As #1B .Name =InputBox("输入姓名")B .TelNum=InputBox("输入电话号码")Print #1，B.Name ，B.TelNumClose #1End SubC.Private Sub Co mmand1_Click()Di m BAs BooksOpen "c ：Person .txt"For Output As #1Name =InputBox("输入姓名")TelNo m=InputBox("输入电话号码")Write #1，BClose #1End SubD.Private Sub Co mmand1_Click()Di m BAs BookOpen "c ：Person .txt"For Input As #1Name =InputBox("输入姓名")TelNum-InputBox("输入电话号码")Print #1，B.Name .B.TelNumClose #1End Sub39、窗体上有两个文本框Textl、Text2以及一个命令按钮Commandl ，编写下列程序：Di mY As IntegerPrivate Sub Commandl_Click()Di m X As Integerx=2Textl .Text =p2(p1(X)，Y)Text2.Text =pl(x)End SubPrivate Function pl(X As Integer)As Integerx+x+yy =x+ypl =x+yEnd FunctionPrivate Function p2(X As Integer ，Y As Integer)As Integerp2=2*x+yEnd Function当单击1次和单击2次命令按钮后，文本框Text1和Text2内的值分别为()。A.2 42 4B.2 44 8C.4 48 8D.10 1058 5840、窗体文件的扩展名是()。A.basB.clsC.frmD.res二、基本操作题41、请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上放置一个名称为Drive1的驱动列表框控件，一个名称为Dir1的目录列表框控件、一个名称为File1的文件列表框控件。程序运行时，可以对系统中的文件进行浏览。如图46-1所示。图46-1注意：程序中不得使用任何变量;保存时必须存放在考生文件夹下，窗体文件名为sj1.frm，工程文件名为sj1.vbp。(2)在名称为Form1的窗体上放置一个名为Label1的标签控件和一个名为Timer1的计时器控件，程序运行后，文本框中显示的是当前的时间，而且每一秒文本框中所显示的时间都会随时间的变化而改变，并且显示的字体为四号宋体字，如图46-2所示。图46-2注意：程序中不得使用任何变量;保存时必须存放在考生文件夹下，窗体文件名为sj2.frm，工程文件名为sj2.vbp。三、简单应用题42、(1)在窗体上建立一个二级菜单，该菜单含有"文件"和"编辑"(名称分别为vbFile和vbEdit)两个主菜单项，其中"文件"菜单包括"打开"、"保存"和"关闭"3个子菜单项(名称分别为vbOpen、vbSave和vbClose)。在名称为Form1的窗体上建立两个主菜单，其标题分别为"文件"和"编辑"，名称分别为vbFile和vbEdit，在"文件"菜单下有3个子菜单项，标题分别为"打开"、"保存"和"关闭"，名称分别为vbOpen、vbSave和vbClose。要求程序运行后，如果选中"文件"下的某个菜单项，则通过MsgBox对话框显示该菜单项的标题，如图31-3所示。图31-3注意：保存时必须存放在考生文件夹下，窗体文件名为sj3.frm，工程文件名为sj3.vbp。(2)在考生文件夹下有工程文件sj4.vbp及窗体文件sj4.frm，该程序是不完整的，请在有"?"的地方填入正确内容，然后删除"?"及代码前的所有注释符(即'号)，但不能修改其他部分。存盘时不得改变文件名和文件夹。在窗体上建立一个名称为Command1，标题为"计算"的命令按钮，再建立一个名称为Text1的文本框。运行界面如图31-4所示。要求程序运行后，若单击"计算"按钮，将计算200350之间所有素数的和，在文本框中显示结果，同时把结果存入文件out.txt中。(在考生文件夹中有标准模块mode.bas,其中的writedata过程可以把结果存入文件，而isprimenum函数可以判断整数x是否为素数，如果是素数，则函数返回True，否则返回False，考生可以把该模块文件添加到自己的工程中。)图31-4 四、综合应用题43、在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm，该程序是不完整的，请在有"?"的地方填入正确内容，然后删除"?"及代码前的所有注释符(即'号)，但不能修改其他部分。存盘时不得改变文件名和文件夹。窗体Form1中有一命令按钮与一个水平滚动条。命令按钮的名称为Command1，标题为"移动"水平滚动条的名称为HScroll1。单击"移动"按钮后，在弹出的对话框中输入数值。输入一个整数后，单击"移动"，滚动条中的滚动块移动到指定的刻度，如果超过了滚动条的最大刻度，则不移动，并且在窗体上显示"输入的数值太大"，如果超过了滚动条的最小刻度，则不移动，并且在窗体上显示"输入的数值太小"。如图8-5所示。图8-5