2014年计算机二级考试VB专家预测试题及答案10

　　21．以下说法中错误的是(    )。 
　　A．如果把一个命令按钮的Default属性设置为True，则按回车健与单击该命令按钮的 
　　作用相同 
　　B．可以用多个命令按钮组成命令按钮数组 
　　C．命令按钮只能识别单击(Click)事件 
　　D．通过设置命令按钮的Enabled属性，可以使该命令按钮有效或禁用 
　　22．以下关于局部变量的叙述中错误的是(    )。 
　　A．在过程中用Dim语句或Static语句声明的变量是局部变量 
　　B．局部变量的作用域是它所在的过程 
　　C．在过程中用Stalic语句声明的变量是静态局部变量 
　　D．过程执行完毕，该过程中用Dim或Static语句声明的变量即被释放 
　　23．以下程序段的输出结果是(    )。 
　　x=1 
　　y=4 
　　Do Until y>4 
　　  x= x * y 
　　  y=y+1 
　　Loop 
　　Print X 
　　A．1  
　　B．4 
　　C．8  
　　D．20 
　　24．如果执行一个语句后弹出如图所示的窗口，则这个语句是(    )。

　　 
　　A．InputBox("输人框"，"请输入VB数据") 
　　B．x=InputBox("输入框"，"请输入VB数据")  
　　C．InputBox("请输入VB数据"，"输入框") 
　　D．x=InputBox("清输入VB数据"，"输入框") 25．有如下事件过程： 
　　Private Sub Form Click() 
　　  Dim n As Integcr 
　　  x=0 
　　n=InputBox("请输入一个整数") 
　　  For i=1 To i 
　　    For i=1 To i 
　　      x=x+1 
　　    Next j 
　　  Next i 
　　  Print x 
　　End sub  
　　程序运行后，单击窗体，如果在输入对话框中输入5，则在窗体上显示的内容是(    )。 
　　A．13  
　　B．14 
　　C．15  
　　D．16 
　　26．请阅读程序： 
　　Sub subP(b()As Integer) 
　　  For i=1 To4 
　　    b(i)=2*i  
　　  Next i 
　　End Sub 
　　Private Sub Commandl Click() 
　　  Dim a(1 To 4)As Integer 
　　  a(1)=5:a(2)=6:a(3)=7:a(4)=8 
　　subP a() 
　　For i=1 To 4 
　　  Print a(i) 
　　Next i 
　　End Sub  
　　运行上面的程序，单击命令按钮，则输出结果是(    )。 
　　A． 2  
　　    4 
　　    6 
　　    8 
　　B． 5 
　　    6 
　　    7 
　　    8 
　　C． 10  
　　    12 
　　    14 
　　    16 
　　D．出错 
　　27．Fibonacci数列的规律是：前2个数为1，从第3个数开始，每个数是它前2个数之和，即1，1，2，3，5，8，13，21，34，55，89，…某人编写了下面的函数，判断大于1的整数X是否是Fibonacci数列中的某个数，若是，则返回True，否则返回False。 
　　Function Isfab(x As Integer)As Boolean 
　　  Dim ii As Integer，b As Integer，C As Integer，flag As Boolean 
　　  flag=False 
　　  a=1：b=1 
　　  Do While x　　c=a+b 
　　a=b 
　　b=c 
　　If x=b Then flag=True 
　　  Loop  
　　  Isfab=flag 
　　End Function 
　　测试时发现对于所有正整数X，函数都返回False，程序需要修改。下面的修改方案中正确的是(    )。 
　　A．把a=b与b=C的位置互换 
　　B．把c=a+b移到b=C之后 
　　C．把Do While xb 
　　D．把If x=b Then flag=True改为If x=a Then flag True 
　　28．在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： 
　　Private Sub Coinmand1 Click() 
　　  Dim a$，b$，c$，k％ 
　　  a="ABCD" 
　　  b="123456" 
　　  c="" 
　　  k=1 
　　  Do While k<=Len(a)Or k<=Len(b) 
　　    If k<=Len(a)Then 
　　      c=c＆Mid(a，k，1) 
　　    End If 
　　    If k<=Len(b)Then 
　　      c=c＆Mid(a，k，1) 
　　    End If 
　　    k=k+1 
　　  Loop 
　　  Print c 
　　End Sub 
　　运行程序，单击命令按钮，输出结果是(    )。 
　　A．123456ABCD  
　　B．ABCD123456 
　　C．D6C584A321  
　　D．A1B2C3D456 
　　29．请阅读程序： 
　　Private Sub Form Click() 
　　  m=1 
　　  For i=4To 1 Step-1 
　　    Print Str(m)； 
　　  
　　m=m+1 
　　For j=1 To i 
　　  Print"*"： 
　　Next j 
　　Print  
　　  Next i 
　　End Sub 
　　程序运行后，单击窗体，则输出结果是(    )。 
　　A．1****  
　　2*** 
　　3** 
　　4* 
　　B．4**** 
　　    3*** 
　　    2** 
　　    1* 
　　C．****  
　　*** 
　　** 
　　* 
　　D．* 
　　    ** 
　　    *** 
　　    **** 
　　30．在窗体上画一个命令按钮(其名称为Command1)，然后编写如下代码：Private Sub Command1 Click() 
　　  Dim a 
　　  a=Array(1，2，3，4) 
　　  i=3：j=1 
　　  Do While>=0 
　　    s=s+a i)*j 
　　    i=i-1 
　　    j=j*1c 
　　  Loop 
　　    Print S 
　　End Sub 
　　运行上面的程序，单击命令按钮，则输出结果是(    )。 
　　A．4321  
　　B．123 
　　C．234  
　　D．1234

　　21．C。【解析】VB中命令按钮可执行的事件包括Click事件、Dragdrop事件、Drag()ver事件、gotFocus 事件、keyDown事件、keyPress事件、keyUp事件、lostFoucus事件、MouseMove事件、MouseDown事件、MouseUp事件等。所以选C。 
　　22．D。【解析】static用于定义静态变量，dim定义的是动态变量。静态变量的生存期是程序的整个运行时间，而动态变量的生存期是所在的过程结束，即过程结束该动态变量即被销毁。而变量的可见性是指变量在程序的哪些部分可供调用，过程中定义的变量在此过程结束后销毁。故本题选D。 
　　23．B。【解析】本题考查的是do until循环语句。do until是直到型循环，当条件为假时执行循环体，直到为真结束。本题中首先y=4，循环条件y>4，所以关系表达式的结果为假，执行循环体中的语句，直到x=4，y=5。然后再次进入循环判断。因为y=5，所以循环判断表达式结果为真，不执行循环体，循环结束。Print x打印X中的值，故选B。 
　　24．D。【解析】InputBox函数在一对话框中显示提示，等待用户输入正文或按下按钮，并返回包含文本框内容的Strin9。InputBox语法InputBox(prompt[，title][，default][，xpos][，ypos][，helpfile，con—text])，其中Prompt是必需的，其余可选，参数Prompt是作为对话框消息出现的字符串表达式。prompt 的最大长度大约是1024个字符。Title可选，显示对话框标题栏中的字符串表达式。所以选D。 
　　25．C。【解析】本题考查嵌套for循环语句，因为n=5，所以外层循环执行5次，内层循环为1～i次，所以循环体x=x+1共执行1+2+3+4+5=15次，故答案为C。 
　　26．A。【解析】本题考查数组为参数在函数间的传递。本题中，当用户点击控件Command1时，控件的Commandl Click()事件过程被触发，在此过程中首先定义了一个包含4个元素的数组a，并赋值。然后以数组a为参数传递给过程subP，在过程subP中执行for循环，分别给a中的4个元素赋值为2、4、6、8。函数执行结束返回过程Command1_Click()，利用for循环打印输出a数组中的值，所以选A。 
　　27．C。【解析】本题中程序思路是利用for循环求得斐波那契数列，然后和x比对，若x是斐波那契数列中的值，则返回布尔值Frue，若不是则返回false。题目源程序中循环条件是x　　28．D。【解析】Mid函数用于提取字符串中的指定位数，函数调用格式为Mid(string，start[，length])，其中start为必要参数，为Long型，为被取出部分的首字符的位置。如果start超过string的字符数，Mid返回空串。length可选参数为返回的字符数，如果省略或length超过文本的字符数，将返回字符串中从start 到尾端的所有字符。Len函数的作用是返回串的长度。本题中a串长4，b串长6，每次循环将a、b的第k个字符取出连在一起给串c，k从1开始，当k=5时，将b中k位置的字符依次插入串C中。 
　　29．A。【解析】本题是利用循环语句输出，每次循环在一行中输出i个星号，变量m是行号，j是星号个数，无参数的print语句让程序在新的一行输出。 
　　30．D。【解析】此程序的作用是将数组a中a(o)、a(1)、a(2)、a(3)作为千位、百位、十位、个位组成一个新数，i是数组的下标，作用是依次取a(3)、a(2)、a(1)、a(O)，s=s+a(i)*J的作用是将取到的数依次放到个位、百位、十位、千位，这是因为J四次循环的取值分别为l、10、100、1000。所以S四次循环的取值为4、4+30、34+200、324、324+1000。