程序代码如下，当单击窗体上的Command1控件时，在窗体上输出的结果是( )。 Private Sub Command1_Click() Dim aa(3，3)As Integer Dim i As Integer,j As Integer Dim s As Integer For i=0 To 3 For j=0 To 3 aa(i，j)=i*4+j+1 Next j Next i For i=0 To 3 s=s+aa(i，1) Next i Print s End SubA．32B．28C．30D

题目

程序代码如下，当单击窗体上的Command1控件时，在窗体上输出的结果是( )。 Private Sub Command1_Click() Dim aa(3，3)As Integer Dim i As Integer,j As Integer Dim s As Integer For i=0 To 3 For j=0 To 3 aa(i，j)=i*4+j+1 Next j Next i For i=0 To 3 s=s+aa(i，1) Next i Print s End Sub

A．32

B．28

C．30

D．36

相似考题

1.窗体上命令按钮Command1的事件过程如下：End Sub 该程序执行后，输出结果是（ ）。A.12 32B.2 32C.2 3D.12 3

2.窗体上命令按钮Command1的事件过程如下：End Sub 该程序执行后，输出结果是（ ）。

3.在窗体上添加一个命令按钮(名为Command1)，然后编写如下事件过程：Private Sub Command1_CliekDim b, kFor k = 1 to 6b=23+kNext kMsgBox b + kEnd Sub打开窗体后，单击命令按钮，消息框的输出结果是【 】。

4.在窗体上没有进行任何属性设置，然后编写如下事件过程，则程序运行结果是（ ）。A. 在窗体上输出55B. 在窗体上输出sum=55C. 出错D. 窗体上不输出

更多“程序代码如下,当单击窗体上的Command1控件时,在窗体上输出的结果是()。Private Sub Command1_Clic ”相关问题

  • 第1题：

    下列不能打开代码窗口的操作是______。A.双击窗体上的某个控件B.双击窗体C.按键D.单击窗体或

    下列不能打开代码窗口的操作是______。

    A．双击窗体上的某个控件

    B．双击窗体

    C．按＜F7＞键

    D．单击窗体或控件


    正确答案：D

  • 第2题：

    程序代码如下，当单击窗体上的Command1控件时，窗体上输出的结果是( )。 Private Sub Command1_Click() Dim Y As Integer，I As Integer Dim A(7)As Integer Y=18：I=0 Do A(I)=Y Mod 2 I=I+1 Y=Y\2 Loop Until Y＜1 For j=I-1 To 0 Step-1 Print A(j)； Next j End Sub

    A．1 0 0 0

    B．1 0 0 1 0

    C．0 0 1 1 0

    D．1 0 1 0 0


    正确答案：B
    解析：程序中Do-Loop循环的执行过程是：第一次I=0，Y=18，把YMod2的值0存入a(0)，I加1使I值变成1，Y\2存入Y，从而使Y变成9，Y为9不小于1，依旧循环：第二次I=1，Y=9，把YMod2的值1存入a(1)，i加1变成2，Y\2存入Y，从而使Y变成4，Y为4不小于1，依旧循环：第三次I=2，Y=4，把YMod2的值0存入a(2)，i值加1变成3，Y\2存入Y，从而使Y变成2，Y为2不小于1，依旧循环；第四次I=3，Y=2，把YMod2的值0存入a(3)，i值加1变成4，Y\2存入Y，从而使Y变成1，Y为1不小于1，依旧循环：第五次I=4，Y=1，把YMod2的值1存入a(4)，i值的加1变成5，Y/2存入Y，从而使Y变成0，Y为0小于1，循环退出。再通过For循环从a(4)到a(0)输出数组元素，结果是“10010”。

  • 第3题：

    （ 15 ）在窗体上添加一个命令按钮（名为 Command1 ），然后编写如下事件过程：

    Private Sub Command1_Click （）

    Dim b,k

    For k=1 to 6

    b=23+k

    Next k

    MsgBox b+k

    End Sub

    打开窗体后，单击命令按钮，消息框的输出结果是 【 15 】 。


    正确答案：

  • 第4题：

    程序代码如下，当单击窗体上的Command1控件时，窗体上显示的结果是( )。 Private Sub Command1_Click() Dim i As Integer，a(9)As Integer For i=9 To 0 Step-1 a(i)=10-i Next i Print a(2); a(5)；a(8) End Sub

    A．2 5 8

    B．7 4 1

    C．8 5 2

    D．3 6 9


    正确答案：C
    解析：本题首先定义了一个一维数组a，它具有10个元素，分别是a(0)～a(9)。然后通过一个For循环给它的各个元素赋值，赋值规律是“10-元素下标”，赋值过后，元素a(0)～a(9)的值依次是10～1。最后输出的a(2)、a(5)和a(8)的值分别是852。

  • 第5题：

    在窗体上画一个名为Command1的命令按钮，编写如下程序：

    程序运行后，单击命令按钮，输出的结果是_________。


    正确答案：
    4
    【解析】本题考查了数组的嵌套使用。程序首先通过一个For循环给数组M的各个数组元素赋值，然后通过数组下标嵌套本身。注意：这样的嵌套时，要保证数组下标不出界，否则程序将出错。

相关内容