单项选择题

在窗体上添加一命令按钮，其名为Command1，然后编写代码如下。
private Sub Command1_Click()
Dim arr(5)As Integer，arr1(5)As Integer
n=3
For i=1 To 5
an(i)=i
arrl(n)=2*n+i
Next
Print arr1(n)；arr(n)
End Sub
程序的运行结果为

A．3 11
B．11 3
C．13 3
D．3 13

<上一题目录下一题>

热门试题

单项选择题

设在窗体上有个文本框，然后编写如下的事件过程。 Private Sub Text1_KeyDown(KeyCode As Integef，Shift As Integer) Const Alt=4 ConstKey_F2=&H71 altdown%=(Shift And Alt)＞0 f2down%=(KeyCode=Key_F2) If altdown% And f2down% Then Text1.Text= BBBBB End If End Sub 上述程序运行后，如果按[Shift+F12]，则在文本框中显示得是

A．Alt+n
B．BBBBB
C．随机出几个数
D．文本框平均内容无变化

单项选择题

在窗体上添加一命令按钮，名称为Command1，然后为该命令按钮编写如下事件过程，该过程的执行结果为 Option Base 1 Private Sub Command1_Click() Dim a As Variant a=Array(1，2，3，4) j=1 For i=4 To 1 Step-1 s=s+a(i)*j j=j*10 Next Print s End Sub

A．4321
B．1234
C．34
D．12

相关试题