单项选择题

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim arrayl(10；10)As Integer
Dim i As Integer，j As Integer
For i=1 To 3
For j=2：To 4
arrayl(i，j)=i+j
Next j
Next i
Text1.Text=arrayl(2，3)+arrayl(3，4)
End Sub
程序运行后，单击命令按钮，在文本框中显示的值是

A．15
B．14
C．13
D．12
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体中添加一个命令按钮，名称为Command1；添加一个文本框，名称为Text1，然后编写如下程序： Private Sub Commandl Click() Dim a(5)， b(5) For j = 1 To 4 a(j) = 3 ( j b(j) = a(j) ( 3 Next j Text1.Text = b(j 2) End Sub 程序运行后，单击命令按钮，在文本框中显示
A．25
B．18
C．36
D．35
单项选择题
设在窗体上有一个名称为Command1的命令按钮，并有以下事件过程： Private Sub Commandl Click() StatiC b As Variant b=Array(1，3，5，7，9) ... End Sub 此过程的功能是把数组b中的5个数逆序存放(即排列为9，7，5，3，1)。为实现此功能，省略号处的程序段应该是
A．For i=0 To 5-1\2
tmp=b(i)
b(i)=b(5-i-1)
b(5-i-1)=tmp
Next
B．For i=0 To 5
tmp=b(i)
b(i)=b(5-i-1)
b(5-i-1)=tmp
Next
C．For i-0 To 5\2
tmp=b(i)
b(i)=b(5-i-1)
b(5-i-1)=tmp
Next
D．For i=1 To 5\2
tmp=b(i)
b(i)=b(5-i-1)
b(5-i-1)=tmp
Next
相关试题