1、二级 VISUAL+BASIC 笔试-233 及答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.将 E-R 图转换到关系模式时，实体与实体间的联系可以表示成( )。（分数：2.00）A.属性B.关系C.键D.域2.Visual Basic 应用程序中，下列关于过程的说法正确的是( )。（分数：2.00）A.过程的定义可以嵌套，但过程的调用不能嵌套B.过程的定义不可以嵌套，但过程的调用可以嵌套C.过程的定义和调用都可以嵌套D.过程的定义和调用都不能嵌套3.下列不属于软件工程 3 个要素的是( )。（分数：2.00）A.工具B.过程C.方法D.环
2、境4.为了使用窗体输出，使 Print 方法在 Form_Load 事件中起作用，必须设置窗体的( )属性。（分数：2.00）A.AutoReDrawB.BackColorC.MoveableD.Caption5.为了使一个窗体从屏幕上消失但仍在内存中，所使用的方法或语句为( )。（分数：2.00）A.ShowB.HideC.LoadD.UnLoad6.窗体上有一个命令桉钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是( )。Private Sub Command1_click()Dim aa=Array(1,2,3,4,5)Fork=1 To 4S=S+a(k)Next
3、kPrint SEnd Sub（分数：2.00）A.10B.14C.15D.1207.下列程序执行后，输出结果是( )。For n=3 To 1 Step-1x=String(n,“#“)Print xNext n（分数：2.00）A.1#2#3#B.#C.#D.3#2#1#8.在窗体上画一个名称为 List1 的列表框，一个名称为 Label1 的标签。列表框中显示若干国家的名称，当单击列表中的某个国家名时，在标签中显示选中国家的名称。下列正确实现上述功能的程序是( )。（分数：2.00）A.Private Sub List_Click()Label1.Caption=List1.ListI
4、ndexEnd SubB.Private Sub List1_Click()Label1.Name=List1.ListIndexEnd SubC.Private Sub List1_Click()Label1.Name=List1.TextEnd SubD.Private Sub List1_Click()Label1.Caption=List1.TextEnd Sub9.在窗体中放置控件，对该控件的操作错误的是( )。（分数：2.00）A.单击窗体上没有控件处，可把活动控件变为不活动控件B.双击任一个控件内部，可激活该控件的代码窗口C.双击一个控件内部，可把活动控件变为不活动控件D.拖动一
5、个活动控件四周的控制小方块可缩放控件10.设计数据库的存储结构属于( )。（分数：2.00）A.需求分析B.概念设计C.逻辑设计D.物理设计11.在一个窗体上添加一命令按钮控件，名为 Command1，事件过程如下，则执行结果是( )。Option Base 1Private Sub Command1_Click()Dim a(5) As IntegerDim k As IntegerDim total As Integera(1)=2a(2)=5a(3)=4a(4)=10a(5)=6For k=1 To 5total=total+a(k)Next kPrint totalEnd Sub（分数
6、：2.00）A.10B.15C.27D.3512.下列程序段的执行结果是( )。Dim A(3,3)For M=1 To 3For N=1 To 3If N=M Or N=3-M+1 ThenA(M,N)=1ElseA(N,N)=0End IfNext NNext MFor M=1 To 3For N=1 To 3Print A(M,N)Next NPrintNext M（分数：2.00）A.1 0 00 1 00 0 1B.1 1 11 1 11 1 1C.0 0 00 0 00 0 0D.1 0 10 1 01 0 113.已知 a=5，b=8，c=12，下列表达式的值为 True 的是(
7、 )。（分数：2.00）A.ab And caB.ab Or caC.ab Xor caD.ab Eqv ca14.下列控件中，具有 Caption 属性的是( )。（分数：2.00）A.组合框B.列表框C.计时器D.单选按钮15.下列描述中止确的是( )。（分数：2.00）A.程序就是软件B.软件开发不受计算机系统的限制C.软件既是逻辑实体，又是物理实体D.软件是程序、数据和相关文档的集合16.有下列事件过程：Private Sub Command1_Click()b=10Do Until b=-1a=InputBox(“请输入 a 的值“)a=Val(（分数：2.00）A.b=InputB
8、ox(“请输入 b 的值“)b=Val(B.d=d-c=-6;当 i=2 时，X(i)=4；d=d-c=-12；当 i=3 时，X(i)=6；d=d-c=-18；当 i=4 时，X(i)=8；d=d+X(i)=-10；c=8；当 i=5 时，X(i)=10；d=d+X(i)=0；c=10；当 i=6 时，X(i)=12； d=d+X(i)=12；c=12。30.程序运行时，向图片框 P1 中加载“C:/WINDOWS/Car.bmp”图像文件，应使用( )：（分数：2.00）A.Picture1.Picture=(“C:/WlNDOWS/Car.bmp“)B.Picture1.Picture=
9、LoadPicture(“C:/WINDOWS/Car.bmp“)C.P1.Picture1=LoadPicture(C:/WINDOWS/Car.bmp)D.P1.Picture=LoadPicture(“C:/W1NDOWS/Car.bmp“) 解析：解析 在运行期间，可以使用 LoadPicture 函数载入图形文件，其格式为：对象名.Picture=LoadPicture(“文件完整路径”)其中，“对象名”指控件名称(即 Name 属性值)，如本题的图片框名为 P1，因此这里的对象名为“PI”；“文件完整路径”指图形文件的正确路径和文件名，要注意的是文件完整路径一定要用双引号括起来。3
10、1.数据的存储结构是指( )。（分数：2.00）A.数据所占的存储空间B.数据的逻辑结构在计算机中的存放形式 C.数据在计算机中的顺序存储方式D.存储在计算机外存中的数据解析：解析 数据的存储结构，又称为数据的物理结构，是数据的逻辑结构在计算机中的存放形式。数据的存储结构有顺序结构、链式结构、散列结构和索引结构等。32.有下列函数过程：Function fun1(ByVal x As Integer,ByVal y As Integer)As IntegerDo While y0reminder=x Mod yx=yy=reminderLoopfun1=xEnd Function在下列按钮单击
11、事件中调用该函数，则该程序的运行结果是( )。Private Sub Command1_Click()Dim a As IntegerDim b As Integera=100b=25x=fun1(a,b)Print xEnd Sub（分数：2.00）A.0B.25 C.50D.100解析：解析 可以通过两种方式来传递参数，即按值传递参数和按地址传递参数。按值传递参数时，传递的只是变量的副本。如果过程改变了这个值，则所作变动只影响副本而不会影响变量本身。用 ByVal 关键字指出参数是按值来传递的。按地址传递参数使过程用变量的内存地址去访问实际变量的内容，在将变量传递给过程时，通过过程可永远改
12、变变量值。默认时是按地址传递参数。题中 fun1 函数的参数都是按值传送的，函数使用“过程名=表达式”的形式获得函数的返回值，如题中“fun1=x”语句。调用函数“x=fun1(a,b)”后，x=25。33.在窗体上画一个名称为“Command1”、标题为“计算”的命令按钮，再画 7 个标签，其中 5 个标签组成名称为 Label1 的控件数组；名称为 Label2 的标签用于显示计算结果，其 Caption 属性的初始值为空，标签 Label3 的标题为“计算结果”。运行程序时会自动生成 5 个随机数，分别显示在标签控件数组的各个标签中。单击“计算”按钮，则将标签数组各元素的值累加，然后计算
13、结果显示在 Label2。下列为“计算”按钮的事件过程，请为空白处选择合适的语句( )。Private Sub Command1_Click()Sum=0For i=0 To 4Sum=Sum+_Next_=SumEnd Sub（分数：2.00）A. B.C.D.解析：解析 本题看似复杂，实际比较简单，只要读懂了题意就能很快地解答本题。题中要求单击“计算”按钮后，累加标签数组各元素的值，那么 sum 的值就应该是标签数组中各元素值的累加，用下标引用各数组元素 label1(i).Caption；题目最后要求将和显示在 Label2 中，因此第 2 个空应该填写label2.Caption。34
14、.设在工程中定义了下列类型：Type Stutypeino As Integerstrname As String*20strsex As String*1smark As SingleEnd Type在窗体上正确使用这个类型的是下列哪个操作( )。（分数：2.00）A.Sub Command1_Click()Dim student As StutypeWith student.ino=12.Strname=smith.strsex=男.smark=89End WithEnd SubB.Sub Command1_Click()Dim Student As StutypeWith student
15、.ino=12.strname=“smith“.strsex=“男“.smark=89End WithEnd Sub C.Sub Comnland1_Click()Dim student As StutypeWith Stutype.ino=12.strname=“smith“.strsex=“男“.smark=89End WithEnd SubD.Sub Command1_Click()Dim student As StutypeWith student.ino=12.Strname=“smith“.strsex=“男“.smark=89End studentEnd Sub解析：解析 本题考
16、查为记录类型变量 student 赋值。使用 With 语句可以对某个对象执行一系列的语句，而不用重复指出对象的名称。其语法如下：With 记录类型变量.记录类型变量成员名=要赋的值End With给记录类型变量中的字符串型成员赋值时要加双引号。35.表达式 Val(“.123E2“)的值是( )。（分数：2.00）A.123B.12.3 C.0D.123e2CD解析：解析 Val 函数返回包含于字符串内的合法数字。使用 Val 函数时应注意下列两点；Val 函数能够识别第一个可用的小数点分隔符；在不能识别为数字的第个字符上停止读入字符串，如果第一个字符不为数字字符，返回 0 值。题中.123
17、E2=0.12310 2=12.3，因此表达式 Val(“.123E2“)的值为 12.3。二、填空题(总题数：12，分数：30.00)36.数据结构分为逻辑结构和存储结构，循环队列属于 1 结构。（分数：2.00）填空项 1:_ （正确答案：逻辑）解析：解析 数据的逻辑结构主要是反映数据之间的逻辑关系，而存储结构是用来反映数据的逻辑结构在计算机存储中间中的存放形式。循环队列主要是强调数据之间的关系，因此属于逻辑结构。37.队列是限定在表的一端进行插入和在另一端进行删除操作的线性表。允许插入的一端称作 1。（分数：2.00）填空项 1:_ （正确答案：队尾）解析：解析 在队列中，允许插入的一端
18、叫做“队尾”，允许删除的一端叫做“队头”。38.在一个容量为 32 的循环队列中，若头指针 front=3，尾指针 rear=2，则该循环队列中共有 1 个元素。（分数：2.00）填空项 1:_ （正确答案：31）解析：解析 设队列容量为 m，则 rearfront，则队列中元素个数为 rear-front；rearfront，则队列中元素个数为 m+(rear-front)。本题 rearfront，则 m=32+(2-3)=31。39.一棵二叉树第 6 层(根结点为第一层)的结点最多为 1 个。（分数：2.00）填空项 1:_ （正确答案：32）解析：解析 二叉树第 k 层上，最多又 2k
19、-1(k1)个结点。第 6 层的结点数最多是 26-1=32。注意区别“二叉树的结点量多数”和“某层的结点最多数”。前者的计算是深度为 m 的二叉树最多有 2m-1 个结点。40.度为 10 的线性表进行冒泡排序，最坏情况下需要比较的次数为 1。（分数：2.00）填空项 1:_ （正确答案：41）解析：解析 对于长度为 N 的线性表，在最坏情况下(即线性表中元素现在的顺序与目标顺序正好相反)，冒泡排序需要经过 N/2 遍的从前往后的扫描和 N/2 遍的从后往前的扫描，需要的比较次数为 N(N-1)/2。41.变量未赋值时，数值型变量的值为 1，字符串变量的值为 2。（分数：4.00）填空项 1
20、:_ （正确答案：0）填空项 1:_ （正确答案：空串）解析：解析 Visual Basic 中，默认数值型变量的初值为 0，字符串的默认值为空，布尔类型的默认值为假(False)。42.下列程序中，a，b，c 代表一个三角形的三条边，程序的作用是判断一个三角形是否成立，请填写空白处。If a+bc _ b+ca _ a+cb ThenMsgBox(“这三条边不能构成一个三角形“)End If（分数：4.00）填空项 1:_ （正确答案：Or Or）解析：解析 三角形成立的条件是任意两条边的和大于第三边，也就是说有其中两条边的和小于馆三边都不能构成一个三角形，所以答案应该为 If a+bc o
21、r b+ca or a+cb Then 三角形不成立。43.设 A=2，B=-4，则表达式 3*A5 Or B+80 的值是_。（分数：2.00）填空项 1:_ （正确答案：True）解析：解析 表达式的运算顺序是，先进行算术运算，然后进行比较运算，最后进行逻辑运算。表达式3*A5 Or B+80 的运算过程如下：(1)先计算表达式中的算术运算，3*A=6，B+8=4；然后计算表达式中的比较运算，3*A5=65=True，B+80=40=True；最后计算表达式中的逻辑运算，True Or True=True，至此读表达式计算结束，因此，表达式的侦为 True。44.组合框有 3 种不同的类型
22、，这 3 种类型是下拉式列表框、简单组合框和下拉式组合框，分别通过把Style 属性设置为 1 来实现。（分数：2.00）填空项 1:_ （正确答案：2、1、0）解析：解析 组合框有 3 种不同的类型，分别为：下拉式组合框、简单组合框、下拉式列表框。通过Style 属性来返回或设置组合框控件的显示类型和行为，对应的值分别为 0、1、2。45.在程序运行时，可以通过 1 方法来移动滚动条的位置。（分数：2.00）填空项 1:_ （正确答案：Move）解析：解析 Move 方法用于移动控件，其基本语法为 ObjectMove Left,Top,Width,Height。其中，参数“Left、Top
23、”指控件移动到的坐标位置：“Width、Height”指控件移动后新的宽度和高度。46.下列程序弹山对话框中按钮的个数为_。MsgBox“确认!“,vbAbortRetryIgnore+vbMsgBoxHelpButton+vbQuestion,“提示/（分数：2.00）填空项 1:_ （正确答案：4）解析：解析 MsgBox 函数在刘话框中显示消息，等待用户单击按钮，并返回一个 Integer 告诉用户单击哪一个按钮。MsgBox 函数的第二个参数用来控制在对话框中显示的按钮、图标的种类段数量，共分为 4组，如下表所示。组 文字常数 值 描述vbOKOnly 0 只显示确定(OK)按钮vbO
24、KCancle 1 显示确定(OK)及取消(Cancle)按钮vbAbortRetryIgnore 2 显示终止(Abort)、重试(Retry)及忽略(Ignore)按钮vbYesNoCancle 3 显示是(Yes)、否(No)及取消(Cancle)按钮vbYesNo 4 显示是(Yes)及否(No)按钮第一组vbRetryCancle 5 显示重试(Retry)及取消(Cancle)按钮vbCritical 16 显示图标 XvbQuestion 32 显示图标?vbExclamation 48 显示图标!第二组 vbInformation 64 显示图标 ivbDefaultButto
25、n1 0 第一个按钮是默认值vbDefaultButton2 256 第二个按钮是默认值vbDefaultButton3 512 第三个按钮是默认值第三组 vbDefaultButton4 768 第四个按钮是默认值vbApplicationModal 0应用程序强制返回。当前 Visual Basic 应用程序被挂起，直到用户对消息框作出响应才继续工作第四组vbSystemModal 4096 系统强制返回。系统全部应用程序都被挂起，直到用户对消息框作出响应才继续工作题中，vbAbortRetryIgnore 表示显示“终止”、“重试”及“忽略”3 个按钮：vbMsgBoxHelpButto
26、n 表示显示“帮助”技钮：vbQuestion 表示显示“?”图标，所以一共是 4 个按钮。47.下列程序的功能是将字符串“abcde”逆序打印出来。请填写空白处以完善程序。Function rev(str1) As StringB=Mid(_,1,1)If B=“Thenrev=“Elserev=rev(Mid(str1,2)+_End IfEnd FunctionPrivate Sub Form_Click()old=“abedE“Print rev(old)End Sub（分数：4.00）填空项 1:_ （正确答案：str1 b）解析：解析 本程序使用“递归”的思想，每次递归取出一个字符放到字符串的后面，然后以后面的字符串作为函数参数进入下一次递归。b=Mid(_，1，1)语句的作用是取出本次递归中字符串的第一个字符，因此该空白处应填 str1；rev=rev(Mid(str1，2)+_语句是将本次递归中字符串的第一个字符放到它的后面，因此该空白处应填 b。递归是一种很重要的算法，在程序设计语言中广泛应用。递归的思想是指函数、过程、子程序在运行过程中直接或间接调用自身而产生的重入现象。简单地说就是自己调用自己。
