itgle.com
在窗体上画一个名称为Label1的标签，然后编写如下事件过程： Private Sub Form_Click() Dim arr(10, 10)As Integer Dimi As Integer, j As Integer For i=2 To 4 For j=2 To 4 arr(i, j)=i*j Next j Next i Label1. Caption=Str(arr(2, 2)+arr(3, 3)) End Sub 程序运行后，单击窗体，在标签中显示的内容是______。A．12B．13C．1
题目
在窗体上画一个名称为Label1的标签，然后编写如下事件过程： Private Sub Form_Click() Dim arr(10, 10)As Integer Dimi As Integer, j As Integer For i=2 To 4 For j=2 To 4 arr(i, j)=i*j Next j Next i Label1. Caption=Str(arr(2, 2)+arr(3, 3)) End Sub 程序运行后，单击窗体，在标签中显示的内容是______。
A．12
B．13
C．14
D．15
相似考题
更多“在窗体上画一个名称为Label1的标签,然后编写如下事件过程:Private Sub Form_Click()Dim arr(10, ”相关问题
-
第1题：
在窗体上画一个名称为Labell的标签，然后编写如下事件过程。 Private Sub Form_Click( ) Dim arr(10, I0) As Integer Dim i As Integer, j As Integer For i = 2 To 4 For j =2 To 4 arr(i,j) =i*j Next Next Labell. Caption = Str(arr(2,2) + arr(3,3) ) End Sub 程序运行后，单击窗体，在标签中显示的内容是
A．12
B．13
C．14
D．15
正确答案：B
解析：本题具有一定的迷惑性，其实分析一下易知arr(i,j)的值即为i*j，所以an(2，2)+arr(3， 3)就是求2*2+3*3=13。注意： For…Next循环控制结构适用于指定循环次数的循环程序。其格式为：
For循环变量二初始值To终值Step步长
Next
其中，当步长为正时，初始值要小于终值；当步长为负时，初始值要大于终值。注意：For…Next循环控制结构。 -
第2题：
在窗体上画—个名称为Label1的标签，然后编写如下事件过程： Private Sub Form_CIick( ) Dim arr(10，10)As Integer Dim i As Integer，j As Integer For i=2 To 4 For j=2 To 4 srr(i，j)=i*j Next j Next i Label1.Caption=Str(arr(2，2)+arr(3，3)) End Sub 程序运行后，单击窗体，在标签中显示的内容是
A．12
B．13
C．14
D．15
正确答案：B
解析：本题arr(i，j)的值即为i*j，所以arr(2，2)+arr(3，3)就是求2*2+3*3=13。 -
第3题：
在窗体上画一个名称为Label1的标签，然后编写如下事件过程： Private Sub Form_Click（) Dim S As Integer S = 0 For i = 1 To 15 x = 2 * i - 1 If x Mod 3 = 0 Then S = S + 1 End If Next i Label1.Caption = S End Sub 运行程序，单击窗体，标签中显示的是________。
A．1
B．5
C．27
D．45
1000 True或任何非0数值 Time或Time＄ Interval是计时器最重要的属性，用来设置一定的时间间隔用来触发Timer事件。Interval以毫秒为单位，设为1000时表示1秒，根据题意，第6空填1000。第7个空，本处表达的意思是当单击窗体时，Timer1的功能被启动，故本处填True，也可以填任何非0数值。因为在VisualBasic中数值0表示False，非0值都可以表示True。根据题意，[8]需要把当前时间赋给Label1的Caption属性，故[8]填Time或Time＄。该函数返回当前时间。 -
第4题：
在窗体上绘制一个名称为Labell的标签，然后编写如下事件过程： Private Sub Form_Click() Dim arr(10，10)As Integer Dim i As Integer，j As Integer For i=2 To 4 For j=2 To 4 arr(i，j)=i*j Next i Next i Labell.Caption=Str(arr(2，2)+arr(3，3)) End Sub 程序运行后，单击窗体，在标签中显示的内容是
A．12
B．13
C．14
D．15
正确答案：B
解析：多重循环属于考试难点，考生应该注意多重循环中环应该按照先进后出、后进先出的原则，不能交叉。按照这个原则将循环层次分清楚就不容易出错。程序运行后在标签中显示的内容是13，选项B正确。 -
第5题：
在窗体上画1个命令按钮，其名称为Command1，然后编写如下事件过程：
PriVate Sub Commandl_CUck()
Dimalt(1 To 100)As Integer
Fori=1 To 100
arr(i)=Int(Rnd*1000)
Nexti
Max=arr(1)
Min=arr(1)
Fori=1 To 100
If [12] Then
Max=arr(i)
正确答案：arr(i)＞Max或arr(i)＞=Max或Maxarr(i)或Max=arr(i)arr(i)Min或arr(i)=Min或Min＞arr(i)或Min＞=arr(i)
arr(i)＞Max或arr(i)＞=Max或Maxarr(i)或Max=arr(i),arr(i)Min或arr(i)=Min或Min＞arr(i)或Min＞=arr(i)