在窗体上绘制一个名称为Label1的标签，然后编写如下事件过程： 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 j Next i Label1.Caption=Str(arr(2,2)+arr(3,3)) End Sub 程序运行后，单击窗体，在标签中显示的内容是( )。A．12B．13C．14D．15

题目

在窗体上绘制一个名称为Label1的标签，然后编写如下事件过程： 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 j Next i Label1.Caption=Str(arr(2,2)+arr(3,3)) End Sub 程序运行后，单击窗体，在标签中显示的内容是( )。

A．12

B．13

C．14

D．15

相似考题

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．12B．13C．14D．15

2.在窗体上画一个名称为Label1的标签，然后编写如下事件过程：Private Sub Form_Click（）Dim arr（10, 10） As IntegerDim i As Integer, j As IntegerFor i = 2 To 4For j = 2 To 4arr（i, j） = i * jNext jNext iLabel1.Caption = Str（arr（2, 2） + arr（3, 3））End Sub程序运行后，单击窗体，在标签中显示的内容是（ ）。A．12B．13C．14D．15

3.在窗体上画两个名称分别为Label1和Label2的标签，再画一个名称为Command1的命令按钮，然后编写如下事件过程：运行上面的程序，单击命令按钮．其输出结果是A．8 9B．8 18C．64 9D．64 18

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 j Next i Labell.Caption=Str(arr(2,2)+arr(3,3)) End Sub 程序运行后，单击窗体，在标签中显示的内容是A． 12B．13C．14D．15

更多“在窗体上绘制一个名称为Label1的标签,然后编写如下事件过程:Private Sub Form_Click() Dim arr( ”相关问题

  • 第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题：

    在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程： Private Sub Commandl_Click（） Dim（） a=Array（”机床”，”车床”，”钻床”，”轴承”）Printa（2）EndSub程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。

    A.机床

    B.车床

    C.钻床

    D.轴承


    正确答案：C
    暂无解析，请参考用户分享笔记

  • 第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题：

    在窗体上画—个名称为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。

相关内容