【单选题】下列程序的输出结果是( )。 Dim a a = Array(1,2,3,4,5,6,7,8) i = 0 For k = 100 To 90 Step -2 s = a(i)^2 If a(i)> 3 Then Exit For i = i + 1 Next k Print k;a(i);s
【简答题】下列程序的输出结果是( )。Private Sub Command1_Click() Dim arr(1 To 10) For i=1 To 10 arr(i)=i Next i For Each i In arr() arr(i)=arr(i)*2+1 Next i MsgBox arrEnd SubA. 11 B. 15 C. 17 D. 13
【单选题】运行下列程序,输入如下两行: Hi, I amhere. 弹出的窗体中的显示结果是( )。Private Sub Commandll_Click Dim abeAs String,sum As String sum Ⅰ”” Do abc=InputBox(”输入abc”) If Right(abc,1)=”.”Then Exit Do sum=sum+abc Loop MsgBoxsum End ...