国家二级VB机试（VisualBasic控制结构）模拟试卷 (二).pdfVIP

国家二级VB机试(VisualBasic控制结

构)模拟试卷第1套

一、选择题(本题共31题，每题1.0分，共31分。)

1、在下面语或函数中，不能描述选择结构的是

A、If语

B、nf函数

C、SclcctCasc语

D、While语

标准答案：D

知识点解析：While语不能描述选择结构。

2、编写如下程序：PrivateSubCommandI_Click()DimscoreAsIntegerscore86If

score85ThenrlElselfscore60Thenr2Elser0EndIfPrintrEndSub程序运行

后,单击命令按钮Command1，输出结果为

A、0

B、1

C、2

D、86

标准答案：B

知识点解析：本题考查If…ElseIf…Else…EndIf语。条件判断成立则执行对应

分支的语。8685,所以二「1。选B。

3、窗体上有1个名称为Commandl的命令按钮，事件过程如下：PrivateSub

Commondl_Click()DimnumAsInteger,xAsIntegernum二Val(InputBox(请输入一

个正整数))SelectCasenumCasels100xx+numCaseIs90xHumCaseElse

xx*numEndSelectPrintx：EndSub运行程序，并在三次单击命令按钮时，分别

输入正整数100、90和60,则窗体上显示的内容为

A、000

B、0060

C、0900

D、100060

标准答案：B

知识点解析：按钮事件中变量x为过程局部变量，第1次输入100时，Select语

执行CaseElse分支xx^num0*1000第二次输入90时，Select语执行Case

o

Else分支xx*num0*900第三次输入60时Select语执行CaseIs90分支

xnum60o因此窗体上显示为0060。

4、编写如下程序：PrivateSubCommandI_Click()DimiAsInteger,jAsInteger

nInputBox(输入一个大于1的正整数)Fori2TonForj2ToSqr(i)IfiModj0

ThenExitForNextjIfjSqr(i)ThenPrintiNextiEndSub该程序的功能是

A、判断n是否为素数

B、输出n以内所有的奇数

C、输出n以内所有的偶数

D、9俞出n以内所有的素数

标准答案：D

知识点解析：假设输入2、4、9进行验证，输入2时程序会输出2,输入4时，程

序会输出2、3,可见程序不是判断n是否为素数，所以A不对。由前面验证可

知，程序也不是输出n以内的所以奇数或偶数，所以B、C也不对。如果输入9

时，程序会输出2、3、5、7,说明程序是输出n以内的所有素数，所以D正确。

5、窗体上有一个名称为Commandl的命令按钮，其单击事件过程如下：Option

BaselPrivateSubCommandl_Click()Dima(4,4)AsIntegerFori1To4ForjlTo4

a(i,j)Int(Rnd*100)NextNextxa(l,1)ya(l,1)Fori1To4Forj1To4Ifx

a(i,j)Thenxa(i,j)Ifya(i,j)Thenya(i,