6

参考答案： A

无

----------------------------------------

5、 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()c=1234c1=Trim(Str(##C.)Fori=1To4PrintNextEndSub程序运行后，单击命令按钮，要求在窗体上显示如下内容：1121231234则在下划线处应填入的内容为

A.Right(c1,i)

B.Left(c1,i)

C.Mid(c1,i,1)

D.Mid(c1,i,i)

参考答案： B

无

----------------------------------------

6、 在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下事件过程：PrivateSubCommand1_Click()n=Val(Text1.Text)Fori=2TonForj=2ToSqr(i)IfiModj=0ThenExitForNextjIfj>Sqr(i)ThenPrintiNextiEndSub该事件过程的功能是

A.输出n以内的奇数

B.输出n以内的偶数

C.输出n以内的素数

D.输出n以内能被j整除的数

参考答案： C

无

----------------------------------------

7、 以下描述中正确的是

A.标准模块中的任何过程都可以在整个工程范围内被调用

B.在一个窗体模块中可以调用在其他窗体中被定义为Public的通用过程

C.如果工程中包含SubMain过程，则程序将首先执行该过程

D.如果工程中不包含SubMain过程，则程序一定首先执行第一个建立的窗体

参考答案： B

无

----------------------------------------

8、 在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程：PrivateFunctionf(mAsInteger)IfmMod2=0Thenf=mElsef=1EndIfEndFunctionPrivateSubCommand1_Click()DimiAsIntegers=0Fori=1To5s=s+f(i)NextPrintsEndSub程序运行后，单击命令按钮，在窗体上显示的是

A.11

B.10

C.9

D.8

参考答案： C

无

----------------------------------------

9、 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()Dimarray1(10,10)AsIntegerDimiAsInteger,jAsIntegerFori=1To3Forj=2To4array1(i,j)=i+jNextjNextiText1.Text=array1(2,3)+array1(3,4)EndSub程序运行后，单击命令按钮，在文本框中显示的值是

A.15

B.14

C.13

D.12

参考答案： D

无

----------------------------------------

10、 在窗体上画4个文本框(如图所示)并用这4个文本框建立一个控件数组，名称为Text1(下标从0开始，自左至右顺序增大)，然后编写如下事件过程：PrivateSubCommand1_Click()ForEachTextBoxInText1Text1(i)=Text1(i)?Indexi=i+1NextEndSub程序运行后，单击命令

首页 上页 2 3 下页 尾页 3/3/3