单项选择题

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

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

单项选择题
阅读程序： Option Base 1 Dim arr()As Integer Private Sub Form_Click() Dim i As Integer，j As Integer ReDim arr(3，2) For i=1 To 3 For j=1 To 2 arr(i，j)=i*2+j Next Next ReDim Preserve arr(3，4) For j=3 To 4 arr(3，j)=j+9 Next Print arr(3，2)+arr(3，4) End Sub 程序运行后，单击窗体，输出结果为
A．21
B．13
C．8
D．25
单项选择题
能够将Picture对象Picl加载当前目录中的face.bmp的语句是
A．Pic1.Picture=LoadPicture(App.path &"face.bmp")
B．Pic1.LoadPicture(App.path及&"face.bmp")
C．Picutrel.Picutre=LoadPicture(App.path&"face.bmp")
D．Picturel.LoadPicture(App.path &"face.bmp")
相关试题