单项选择题

在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Commandl_Click()
Dim a(5)As String
Fori=1 To 5
a(i)=Chr(Asc("A")+(11))
Nexti
For Each b In a
Print b
Next
End Sub
程序运行后，单击命令按钮，输出结果是( )。

A．ABCDE
B．1 2 3 4 5
C．abcde
D．出错信息
<上一题 目录 下一题>
热门 试题

单项选择题
先在窗体上添加一个命令按钮，然后编写如下程序： Function fun(ByValnum As Long)As Long Dim k As Long k=1 num=Abs(nam) Do While num k=k*(num Mod 10) num=num 10 Loop Fun=k End Function PrivateSubCommandl_Click() Dim n As Long Dim r As Long n=InrputBox(“请输入一个数”) n=CLng(n) r=-fun(n) Printr End Sub 在程序运行后，单击命令按钮，在对话框中输入“100”，输出结果是( )。
A．0
B．100
C．200
D．300
单项选择题
在窗体上画一个命令按钮，然后编写如下程序。运行后，单击命令按钮，输出结果为 ( )。 Private Sub Command4_Click() Dima As Integer,bASInteger a=1 b=2 PrintN(a,b) End Sub Function N(X As Integer,yAsInteger)AsInteger N=IIf(x＞y，x，y) End Funcfion
相关试题