二级VB202_年计算机二级考试（VB）模拟试卷十一汇编1、以下程序的功能是从键盘输入若干个学生的考试成绩，统计并输出最高分和最低分，当输入负数时结束输入，输出结果。请补充完整下列程序段。 Dim _，ama_,amin As Single _=InputBo_("Enter a score") ama_=_ amin=_ Do While 【8】 If _>ama_ Then ama_=_ End If If 【9】 Then amin=_ End If _=InputBo_("enter a score") Loop Print"ma_="；ama_，"min="；amin
2、链表适用于______查。
3、要从表中物理删除一条记录，应使用命令______。
A．首先用DELETE命令，然后用ZAP命令
B．首先用DELETE命令，然后用PACK命令
C．直接用ZAP命令
D．直接用DELETE命令
4、窗体上有List1、List2两个列表框，程序运行时，在两个列表框中分别选中1个项目，如图a所示，单击名称为Command1的“交换”按钮，则把选中的项目互换，互换后的位置不限，如图b所示。下面的程序可实现这一功能，请填空。Private Sub Command1_Click()If
List1.Te_t=”” or List2.Te_t=”” ThenMsgBo_”请选择交换的物品！”ElseList1.AddItem List2.Te_tList2.RemoveItem（ 11 ）（ 12 ） List1.RemoveItem List1.ListInde_End IfEnd Sub
5、下列叙述中，错误的一条是______。
A．在Visual Basic中，一个应用程序是以工程文件的形式保存在磁盘上的
B．Visual Basic的控件是具有自己的属性．事件和方法的对象C．所有的对象都具有相同的属性，例如文本框也有Caption属性D．Visual Basic程序可以有编译运行和解释运行两种运行模式
6、设一棵二叉树中有3个叶子结点，有8个度为1的结点，则该二叉树中总的结点数为()
朱迅被传离婚A.12
B.13
C.14
D.15
7、在窗体上画两个组合框，其名称分别为Combo1、Comb02，然后画两个标签，名称分别为Label1
、Label2，如图所示。程序运行后，如果在某个组合框中选择一个项目，则把所选中的项目在其下面的标
签中显示出来。请填空。Privte Sub Combo1_Click( ) Call Showltem(Comb01.Label1) End Sub Private Sub Combo2_Click( )Call Showltem(Combo2.Labe12) End Sub Public Sub Showhem(tmpCombo As ComboBo_，tmpLabd As Label)，【10】 Caption= 【11】 .Te_t End Sub
8、下列事件过程：Private Sub Command1_ Click() MsgBo_ Str (123+123)End Sub运行时，信息框中.出现的结果是______。A．123+123
B．123
C．246
D．显示出错信息
校训大全>鹤田真由9、下列程序的功能是求出所有的1～100之间的孪生素数。孪生素数是指两个素数的差为2，如3和5，11和13等，请填空。 Private Sub Form_Click() Dim i As Integer For i=3 To 97 Step 2If 【14】 Then Print i，i+2End If Ne_t i End Sub Public Function prime(ByVal n As Integer)As Boolean Dim i As Integer For i=2 To n-1 If 【15】Then E_it For End If Ne_t i If i=n Then prime=True Else prime=False 安志杰身高
End If
10、在默认情况下，工具箱中只显示______控件。11、设s="中华人民共和国"，表达式Left(S,1)+Right(S,1)+Mid(S,3,2)的值为( )。A．"中华民国"
B．"中国人民"
C．"___人民"
D．"人民共和"
12、若按功能划分，软件测试的方法通常分为【3】测试方法和黑盒测试方法。
13、假定编写如下事件过程： Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single，Y As Single) If(Button and 3)=3 then Print"Hello" End if End Sub 程序运行后，为了在窗体上输出“Hello”，应该窗体上执行以下( )操作。
A．只能按下左键并拖动
李现飞机12厘米B．只能按下右键并拖动
C．必须同时按下左．右键并拖动
D．按下左键拖动或按下右键拖动
14、设有如下程序： Private Sub Command1_Click() Dim sum As
Double, _ As Double sum=0 n=0 For i=1 To 5_=n/in=n+1sum=sum+_Ne_t End Sub 该程序通过For循环计算一个表达式的值，这个表达式是______。
A．1+1/2+2/3+3/4+4/5
B．1+1/2+2/3+3/4
C．1/2+2/3+3/4+4/5
D．1+1/2+1/3+1/4+1/5
15、假定有下表所列的菜单结构： (表格) 要求程序运行后，如果单击菜单项“大图标”，则在该菜单项前添加一个“√”。以下正确的事件过程是______。
A．Private Sub bigicon_Click() bigicoChecked=False End Sub B．Private Sub bigicon_Click0 Mapp
eabigicoChecked=True End Sub C．Private Sub bigicon_Click() bigicoChecked=True End Sub D．Private Sub bigicon_Click0 appeabigicoChecked=True End Sub