单项选择题

设有命令按钮Commandl的单击事件过程，代码如下： Private Sub Commandl_Click() Dima(30)As Integer Fori=1 To 30 a(i)=Int(Rnd*100) Next For Each arrltem In a IfarrltemMod7=0 ThenPrintarrItem； Ifarrltem＞90ThenExitFor Next End Sub 对于该事件过程，以下叙述中错误的是( )。

A．a数组中的数据是30个100以内的整数
B．语句ForEacharrItem Ina有语法错误
C．Ifarrltem Mod7=0……语句的功能是输出数组中能够被7整除的数
D．Ifarrltem＞90……语句的作用是当数组元素的值大于90时退出For循环
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程： Private Funcdonf(m As Integer) If m Mod2=0 Then f=m E1Se f=1 End If End FunCdOn Private Sub Cmnmalldl_CUCk() Dimi As Integer S=0 Fori=1 To 5 s=s+f(i) Next PrintS End Sub 程序运行后，单击命令按钮，在窗体上显示的是( )。
A．11
B．10
C．9
D．8
单项选择题
下列程序的执行结果为( )。 Ptivate Sub Command_Click() DimFirStr As String FirStr= abcdef PrintPat(FirSb) End Sub PrivateFunctionPat(xStr As String)As String DimtempStr As String，strLen As Integer tempStr= strLen=Len(xStr) i=1 DoWhile i＜=Len(xStr)-3 tempStr=tempSlx+Mid(xStr，i，1)+Mid(xStr，strLen-i+1，1) i=i+1 Loop Pat=tempStr End Function
A．abcdef
B．afbecd
C．fedcba
D．defabc
相关试题