填空题

下面程序的输出结果是______。
Private Sub Command1_Click()
Dim a(1 To 20)
Dim i
For i=1 To 20
a(i)=i
Next i
For Each i In a()
a(i)=20
Next i
MsgBox a(2)
End Sub

【参考答案】

T
<上一题 目录 下一题>
热门 试题

填空题
假定有以下函数过程： Function Fun(S As String) As String Dim s1 As String For i=1 To len(S) s1=Ucase(Mid(S，i，1))+s1 Next i Fun=s1 End Function 则Str2=Fun( abcdefg )的输出结果为______。
填空题
执行下面的程序段后，变量s的值为______。 S=5 For i=2.6 to 4.9 step 0.6 S=S+1 Next i
相关试题