【简答题】下列程序的输出结果是( )。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 ...