1、2023年9月全国计算机等级考试二级VB真题一、选择题(每题2分,共70分)(1)下列数据结构中,属于非线性结构的是A)循环队列B) 带链队列C) 二叉树D)带链栈(2)下列数据结果中,可以按照“先进后出”原则存取数据的是A) 循环队列B) 栈C) 队列D) 二叉树(3)对于循环队列,下列叙述中对的的是A)队头指针是固定不变的B)队头指针一定大于队尾指针C)队头指针一定小于队尾指针D)队头指针可以大于队尾指针,也可以小于队尾指针(4)算法的空间复杂度是指A)算法在执行过程中所需要的计算机存储空间B)算法所解决的数据量C)算法程序中的语句或指令条数D)算法在执行过程中所需要的临时工作单元数(5)
2、软件设计中划分模块的一个准则是A) 低内聚低耦合B) 高内聚低耦合C) 低内聚高耦合D) 高内聚高耦合(6)下列选项中不属于结构化程序设计原则的是A) 可封装D) 自顶向下C) 模块化D) 逐步求精(7)软件具体设计产生的图如下:该图是A) N-S图B) PAD图C) 程序流程图D) E-R图(8)数据库管理系统是A)操作系统的一部分B) 在操作系统支持下的系统软件C) 一种编译系统D) 一种操作系统(9)在E-R图中,用来表达实体联系的图形是A) 椭圆图B) 矩形C) 菱形D) 三角形(10)有三个关系R,S和T如下:其中关系T由关系R和S通过某种操作得到,该操作为A)选择B)投影C)交D)
3、并(11)以下变量名中合法的是A)x2-1B)printC)str_nD)2x(12)把数学表达式 图1 表达为对的的VB表达式应当是A)(5x+3)/(2y-6)B)x*5+3/2*y-6C)(5*x+3) l图2 (2*y-6)D)(x*5+3)/(y*2-6)(13)下面有关标准模块的叙述中,错误的是A)标准模块不完全由代码组成,还可以有窗体B)标准模块中的Private过程不能被工程中的其他模块调用C)标准模块的文献扩展名为.basD)标准模块中的全局变量可以被工程中的任何模块引用(14)下面控件中,没有Caption属性的是A)复选框B)单选按钮C)组合框D)框架(15)用来设立文字
4、字体是否斜体的属性是A)FontUnderlineB)FontBoldC)FontSlopeD)FontItalic(16)若看到程序中有以下事件过程,则可以肯定的是,当程序运营时Private Sub Click_MouseDown(Button As Integer,_Shift As Integer,X As Single,Y As Single)Print “VB Program”End SubA)用鼠标左键单击名称为“Command1”的命令按钮时,执行此过程B)用鼠标左键单击名称为“MouseDown”的命令按钮时,执行此过程C)用鼠标左键单击名称为“MouseDown”的控件时,
5、执行此过程D)用鼠标左键或右键单击名称为“Click”的控件时,执行此过程(17)可以产生30-50(含30和50)之间的随机整数的表达式是A)Int(Rnd*21+30)B)Int(Rnd*20+30)C)Int(Rnd*50-Rnd*30)D)Int(Rnd*30+50)(18)在程序运营时,下面的叙述中对的的是A)用鼠标右键单击窗体中无控件的部分,会执行窗体的Form_Load事件过程B)用鼠标左键单击窗体的标题栏,会执行窗体的Form_Click事件过程C)只装入而不显示窗体,也会执行窗体的Form_Load事件过程D)装入窗体后,每次显示该窗体时,都会执行窗体的Form_Click事
6、件过程(19)窗体上有名称为Command1的命令按钮和名称为Text1的文本框Private Sub Command1_Click()Text1.Text=”程序设计”Text1.SetFocusEnd SubPrivate Sub Text1_GotFocus()Text1.Text=”等级考试”End Sub运营以上程序,单击命令按钮后A)文本框中显示的是“程序设计”,且焦点在文本框中B)文本框中显示的是“等级考试”,且焦点在文本框中C)文本框中显示的是“程序设计”,且焦点在命令按钮上D)文本框中显示的是“等级考试”,且焦点在命令按钮上(20)设窗体上有名称为Option1的单选按钮,且
7、程序中有语句:If Options.Value=True Then下面语句中与该语句不等价的是A)If Option.Value ThenB)If Option1=True ThenC)If Value=True ThenD)If Option1 Then(21)设窗体上有1个水平滚动条,已经通过属性窗口把它的Max属性设立为1,Min属性设立为100。下面叙述对的的是A)程序运营时,若使滚动块向左移动,滚动条的Value属性值就增长B)程序运营时,若使滚动块向左移动,滚动条的Value属性值就减少C)由于滚动条的Max属性值下于Min属性值,程序会犯错D)由于滚动条的Max属性值下于Min属
8、性值,程序运营时滚动条的长度会缩为一点,滚动块无法移动(22)有如下过程代码:Sub var_dim()Static numa As IntegerDim numb As Integernuma=numa+2numb=numb+1print numa;numbEnd Sub连续3次调用var_dim过程,第3次调用时的输出是A)2 1B)2 3C)6 1D)6 3(23)在窗体上画1个命令按钮,并编写如下事件过程:Private Sub Command1_Click()For i=5 to 1 step -0.8Print Int(i);Next iEnd Sub运营程序,单击命令按钮,窗体上
9、显示的内容为A)5 4 3 2 1 1B)5 4 3 2 1C)4 3 2 1 1D)4 4 3 2 1 1(24)在窗体上画1个命令按钮,并编写如下事件过程:Private Sub Command1_Click()Dim a(3,3)For m=1 To 3For n=1 To 3If n=m Or n=4-m Thena(m,n)=0End IfPrint a(m,n);Next nPrintNext mEnd Sub运营程序,单击命令按钮,窗体上显示的内容为A)2 0 00 4 00 0 6B)2 0 40 4 04 0 6C)2 3 03 4 00 0 6D)2 0 00 4 50 5
10、 6(25)设有以下函数过程Function fun(a As Integer,b As Integer)Dim c As IntegerIf aba=a-bWendfun=aEnd Function在调试时发现函数是错误的。为使函数能产生对的的返回值,应做的修改是A)把a=a-b改为a=b-aB)把a=a-b改为a=abC)把While ab改为While ab改为While a=b(30)下列关于通用对话框CommonDialog1的叙述中,错误的是A)只要在“打开”对话框中选择了文献,并单击“打开”按钮,就可以将选中的文献打开B)使用CommonDialog1.ShowColor方法,可
11、以显示“颜色”对话框C)CancelError属性用于控制用户单击“取消”按钮关闭对话框时,是否显示犯错误警告D)在显示“字体”对话框前,必须先设立CommonDialog1的flags属性,否则会犯错(31)在运用菜单编辑器设计菜单时,为了把组合键“Alt+X”设立为“退出(X)”菜单项的访问键,可以将该菜单项的标题设立为A)退出(X&)B)退出(&X)C)退出(X#)D)退出(#X)(32)在窗体上画1个命令按钮和1个文本框,其名称分别为Command1和Text1,再编写如下程序:Dim ss As StringPrivate Sub Text1_KeyPress(KeyAscii As
12、 integer)If chr(KeyAscii)”Then ss=ss+chr(KeyAscii)End SubPrivate Sub Command1_Click()Dim m As String,i As IntegerFor i=Len(ss) To 1 step -1m=m+Mid(ss,i,1)NextText1.Text=Ucase(m)End Sub程序运营后,在文本框中输入“Number100”,并单击命令按钮,则文本框中显示的是A)NUMBER 100B)REBMUNC)REBMUN 100D)001 REBMUN(33)窗体的左右两端各有1条直线,名称分别为Line1、L
13、ine2;名称为Shape1的圆靠在左边的Line1直线上(见图);另有1个名称为Timer1的计时器控件,其Enable属性值是True。规定程序运营后,圆每秒向右移动100,当圆碰到Line2时则停止移动。为实现上述功能,某人把计时器的Interval属性设立为1000,并编写了如下程序:Private Sub Timer1_Timer()For k=Line1.X1 To Line2.X1 Step 100If Shape1.Left+Shape1.WidthLine2.X1 ThenShape1.Left=Shape1.Left+100End IfNext kEnd Sub运营程序时发
14、现圆立即移动到了右边的直线处,与题目规定的移动方式不符。为得到与题目规定相符的结果,下面修改方案中对的的是A)把设计器的Interval属性设立为1B)把For k=Line1.X1 To Line2.X1 Step 100和Next k两行删除C)把For k=Line1.X1 To Line2.X1 Step 100改为For k=Line2.X1 To Line1.X1 Step 100D)把If Shape1.Left+Shape1.WidthLine2.X1 Then改为If Shape1.Left =90 ThenLevel=”A”Else If s=75 ThenLevel=”B
15、”Else If s=60 ThenLevel=”B”ElseLevel=”D”End If下面用SelectCase结构改写上述程序,使两段程序所实现的功能完全相同。请填空。Select Case sCase 【9】 =90Level=”A”Case 75 To 89Level=”B”Case 60 To 74Level=”B”Case 【10】Level=”D” 【11】(8)窗体上有名称为Command1的命令按钮。事件过程及2个函数过程如下:Private Sub Command1_Click()Dim x As Integer,y As Integer,zx=3y=5z=fy(y)p
16、rint fx(fx(x),yEnd Sub Function fx(ByBal a As Integer)a=a+afx=aEnd FunctionFunction fy(ByRef a As Integer)a=a+afy=aEnd Function运营程序,并单击命令按钮,则窗体上显示的2个值依次是 【12】 和 【13】 。(9)窗体上有名称为Command1的命令按钮及名称为Text1、能显示多行文本的文本框。程序运营后,假如单击命令按钮,则可打开磁盘文献c:test.txt,并将文献中的内容(多行文本)显示在文本框中。下面是实现此功能的程序,请填空。Private Sub Comm
17、and1_Click()Text1=”Number=FreeFileOpen “c:test.txt”For Input As NumberDo While Not Eof( 【14】 )Line Input #Number,sText1.Text=Text1.Text+ 【15】 +Chr(13)+Chr(10)LoopClose NumberEnd Sub 一、选择题(1)C(2)B(3)D(4)A(5)B(6)A(7)C(8)B(9)C(10)D(11)C(12)D(13)A(14)C(15)D(16)D(17)A(18)C(19)B(20)C(21)A(22)C(23)A(24)B(25)D(26)C(27)D(28)B(29)D(30)A(31)B(32)D(33)B(34)C(35)A二、填空题 (6)Text1.Text Text1.Text Form2 (7)IS ELSE END Select (8)12 10 (9)Number s学习使人进步,相信能就一定能成功