单项选择题

在窗体上画一个名称为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 　　　　　　art(i,j)=i+j 　　　　Next 　　Next 　　Text1.Text=arr(2,3)+arr(3,4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是

A．12
B．13
C．14
D．15

<上一题目录下一题>

热门试题

单项选择题

下面程序运行后，单击命令按钮，输出的结果是 Pivate Sub Cornmand1_Click() Dim a%(1 To 4)，b%(2 To 6)，i%，str1#，str2# For i=1 To 4 a(i)=i Next For i=2 To 6 b(i)=i Next str1=YAG(a) str2=YAG(b) Print str1= ;str1; str2= ;str2 End Sub Function YAG(a()As Integer) Dim t#,i% t=1 For i=LBound(a)To UBound(a) t=t*a(i) Next YAG=t End Function

A．str1=24 str2=720
B．str1=12 str2=360
C．str1=24 str2=180
D．str1=36 str2=720

单项选择题

在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim in As Integer，n As Integer，p As Integer m=3:n=5:p=0 Call Y(m,n,p) Print Str(p) End Sub Sub Y(ByVal i As Integer，ByVal j As Integer，k As Integer) k=i+j End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是

A．4
B．6
C．8
D．10

相关试题