窗体上有一个命令按钮，命令按钮的单击事件过程如下： Private Sub Command1_Click() Dim a a=Array(1,2,3,4,5) For k=1 To 4 s=s+a(k) Next Print S End Sub 运行程序后，单击命令按钮，输出结果是

A．10

B．14

C．15

D．120

[单选题]在窗体上有一个命令按钮，然后编写如下事件过程。 Private Sub Command1_Click() Dim a(5)As String FOR i=1 To 5 a(i)=Chr(Asc("A")+(i-1)) Next For Each b h a Print b； Next End Sub 程序运行后，单击命令按钮，输出结果是A．ABCDEB．1 2 3 4 5C．abcdeD．出错信息

[单选题]在窗体上有一个命令按钮，然后编写如下事件过程 Private Sub Command1 _ cickc ( ) a=InputBox("enter the first integer") b=InputBox("enter the second integer") Print b + a End Sub 程序运行后，单击命令按钮，先后在两个输入框中分别输入“2”和“6”，则输出结果为A．2B．62C．8D．26

[单选题]在窗体上有一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()D．im a(5) As StringF．OR i=1 To 5a(i) =Chr(Asc("A") +(i-1))NextF．or Each b In aPrint b；NextE．nd Sub程序运行后，单击命令按钮，输出结果是A．ABCDEB．1 2 3 4 5C．abcdeD．出错信息

[单选题]窗体上有一个命令按钮Command1，编写如下事件过程：Private Sub Command1_Click()a = 80: b = 50: c = 30If ac Then b = cIf b = c And ac Then c = a + bPrint a, b, cE．nd Sub运行时，单击按钮，窗体输出的结果是( )。A． 80 50 30B． 80 30 30C． 50 30 80D． 50 30 30

[单选题]窗体上有一个命令按钮Command1，编写如下事件过程：Private Sub Command1_Click()x = InputBox("x=")y = InputBox("y=")Print x + yE．nd Sub运行后，单击命令按钮，先后在两个输入对话框中输入123和321，窗体显示的内容是( )。A． 444B． 123321C． 123+321D． 出错信息

[单选题]窗体上有一个命令按钮Command1，编写如下事件过程：Private Sub Command1_Click()Sum = 0F．or m = 1 To 3Select Case mC．ase 1a = 1C．ase 2a = 2C．ase 3a = 3E．nd SelectPrint a,Sum = Sum + aNext mPrint SumE．nd Sub运行时，单击按钮，输出结果是( )。A． 3 3 3 9B． 3 2 1 6C． 1 1 1 3D． 1 2 3 6

[单选题]在窗体上有一个命令按钮,然后编写如下事件过程。Private Sub Command1_Click()D．im a(5)As StringF．OR i=1 To 5a(i)=Chr(Asc("A")+ (i-1))NextF．or Each b In aPrint b;NextE．nd Sub程序运行后,单击命令按钮,输出结果是A．ABCDEB．1 2 3 4 5C．abcdeD．出错信息

[单选题]窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是。Private Sub Command1_Click()Dim aa = Array(1,2,3,4,5)For K = 1 To 4 S = S + a(K)Next K Print SEnd SubA. 10 B. 14 C. 15 D. 120

[单选题]窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是 Private Sub Command1_Click( ) Dim a a = Array(1,2,3,4,5) For k = 1 To4 s=s+a(k) Next Print S End SubA．10B．14C．15D．120

[单选题]窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是( )。 Private Sub Command1_Click() Dim a a=Array(1, 2, 3, 4, 5) Fork= 1 To 4 s=s+a(k) Next k Print s End SubA．10B．14C．15D．120