2018年3月计算机二级VB考前冲刺题8

>>计算机二级考试模拟题：2018年3月计算机二级VB考前冲刺题8

>>全国计算机等级考试通关课程

(36)下面程序的执行结果是( )。

Private Sub CommanD1—Click( )a=0

k=1Do While k<4

X=k+kk=k+1

Prim X;

LoopEnd Sub

A.1 4 27

B.1 1 1

C.1 4 9

D.0 0 0

(37)窗体上有名称分别为Textl、Text2的文本框，名称为CommanD1的命令按钮。运行程序，在Textl中输入“FormList”，然后单击命令按钮，执行如下程序：Private Sub CommanD1—Click( )Text2.Text=UCase(Mid(Textl.Text，5，4)End Sub在Text2中显示的是( )。

A.form

B.list

C.FORM

D.LIST

(38)窗体上有名称为CommanD1的命令按钮，名称分别为Listl、List2的列表框，其中Listl的MultiSelect属性

设置为1(Simple)，并有如下事件过程：Private Sub CommanD1—Click( )

For i=0 To Listl.ListCount一1

If Listl.Selected(i)=True Then

List2.AddItem Text

EndIf

NextEnd Sub上述事件过程的功能是将Listl中被选中的列表项添加到List2中。运行程序时，发现不能达到预期目的，应做修改，下列修改中正确的是( )。

A.将For循环的终值改为Listl.ListCount

B.将Listl.Selected(i)=True改为Listl.List(i).Selected=True

C.将List2.AdD1tem Text改为List2.AddItem Listl.List(i)

D.将List2ddItem Text改为List2.Addhem Listl.ListIndex

(39)设有如下CommanD1的单击事件过程及fun过程：

Private Sub CommanD1_Click( )

Dim X As Integer

x=Val(InputBox(”请输入一个整数”))fun(X)

End Sub

Private Sub fun(x As Integer)

If X Mod 2=0 Then fun(X/2)Print X;

End Sub

执行上述程序，输入6，结果是( )。

A.3 6

B.6 3

C.6

D.程序死循环

(40)命令按钮CommanD1的单击事件过程如下：

Private Sub CommanD1—Click( )Dim a(10，10)As IntegerX=0

For i=l T0 3

For J=1 T0 3

a(i，j)=i}2 Mod J

If x

Next

Next

Print XEnd Sub

执行上述事件过程后，窗体上显示的是( )。

A.1

B.2

C.3

D.4

参考答案及解析

(36)B【解析】本题主要考查算术运算符中的幂运算，在程序中x的值为k的k次方的a次方，k的值每次循环都加1，但a的值不变总为0，除0以外的任何数的0次方都是l，因此，在k的值变为4之前会输出三个l。

(37)D【解析】Mid为中部截取函数，格式为Mid(字符串，起始位置，长度)，Ucase函数的作用是把字符串中的小写字母转换为大写字母。题目中Mid函数截取字符串“Form—List”第5个字符开始的4个字符，结果为“List”，Ucase函数把“List”全部变为大写，即“lAST”。

(38)C【解析】题目程序不能将List1中的选中项添加到ljsc2中，List2.Addltem Text一行有误，应该改为List2。Ad—dItem List1.List(i)才能使List1中每个选中的行添加到List2中。列表框控件的List属性保存了列表框中所有值的数组，可以通过下标访问数组中的值。

(39)A【解析】题目中fun过程是一个递归过程，它的结束条件是参数值为奇数。第1次调用，参数值为6，是偶数所再次调用fun过程，这次参数为6/2=3，是奇数，不再调用自身，接着执行下一句输出参数值即3，然后返回第1次调用过程中执行下一句输出第1次调用参数值，即6。因此程序会输出3 6。

(40)B【解析】题目中定义了一个二维数组，为数组赋初值并找出这些值中最.大的值输出。数组中的值为：

a(1，1)=1*2 mod l=0a(1，2)=1*2 rood 2=0a(1，3)=1·2 lnod 3=2

a(2，1)=2*2 mod l=Oa(2，2)=2*2*2=Oa(2，3)=2*2 Inod 3=l

a(3，1)=3*2 mod l=0a(3，2)=3(2血)d 2=0a(3，3)=3*2mod 3=0

显然最.大值为2，因此Print x语句将在窗体上显示2。

登录坦途网计算机等级考试频道，为你提供更多计算机二级VB考试试题，为你的考试做好充分的准备。祝愿广大考生都能取得一个理想的好成绩。