niusouti.com

（16）在窗体上画一个命令按钮，其名称为Commandl.程序运行后，单击命令按钮，输出结果是 Private Sub p1(n As Integer) For i=n To 1 Step -1 x=String(i,"*") Print x Next i End Sub Private Sub Commandl_Click() P1(3) End SubA.*** ** *B.* ** ***C.* * *D.******

题目

（16）在窗体上画一个命令按钮，其名称为Commandl.程序运行后，单击命令按钮，输出结果是 Private Sub p1(n As Integer) For i=n To 1 Step -1 x=String(i,"*") Print x Next i End Sub Private Sub Commandl_Click() P1(3) End SubA.*** ** *B.* ** ***C.* * *D.******

相似考题

1.在窗体上画一个命令按钮，其名称为Commandl，然后编写如下程序：Function a(x As Integer, y As Integer) As Integera = IIf(x ＞ y, x, y)End FunctionPrivate Sub Command1_Click()Dim n As Integer, m As Integern = 10m = 20Print a(n, m)End Sub程序运行后，单击命令按钮，输出结果是______。

2.在窗体上画一个命令按钮，其名称为Commandl，然后编写如下事件过程：程序运行后，单击命令按钮，消息框输出的是系统当前日期和当前时间。

3.在窗体上画一个命令按钮，其名称为Commandl，然后编写如下事件过程：Private Sub Corrtmandl Click()a$=”Nationalcomputer rank Examination”n=Len(a$)S=0For i=1 To nb$=Mid(a$，i，1)Ifb$=”n”Thens=s+1End IfNext iPrint sEnd Sub程序运行后，单击命令按钮，输出结果是【 】。

4.在窗体上画一个命令按钮，其名称为Commandl，然后编写如下事件过程：程序运行后，单击命令按钮，其输出结果为__________。

参考答案和解析
正确答案：A
【解析】分析程序可知，命令按钮单击事件调用p1(3)函数，因此循环中的n为3，所以For循环的条件为Fori=3 to l Step-1，所以For循环从3递减到1，输出的“*”号也递减，每一次Print执行后，自动换行。最后输出的结果如选项A）所示。
更多“(16)在窗体上画一个命令按钮,其名称为Commandl.程序运行后,单击命令按钮,输出结果是 Private Su ”相关问题

  • 第1题：

    在窗体上画一个命令按钮，其名称为Command]，然后编写如下事件过程：程序运行后，单击命令按钮，消息框输出的是（ ）

    A. 48

    B. 72

    C. 96

    D. 128


    正确答案：B
    奉题考查VBA中二维数组和循环的知识。本题使用了二重循环为两个二维数组中的元素均进行了赋值，最后求两个数组元素值的积。浅们只需要注意这两个数组元素在循环中被赋了什么值，当i=3 j=3时，al(3，3)=3+3=6，a2(3。3)= al(3，3)+3+3=12．所以最后二者之积为72。

  • 第2题：

    在窗体上画一个命令按钮，其名称为Command1。程序运行后，单击命令按钮，输出结果是（ ）。 Private S．b p1(n As Integer) For i=n To 1 Step=1 x=String(i，"*") Print x Next i End Sub Private Sub Command1 Click（ ） pl(3) EndSub

    A.*** ** *

    B.*** ***

    C.* * *

    D.******


    正确答案：A
    A。【解析】分析程序可知，命令按钮单击事件调用pl(3)函数，因此循环中的n为3，所以For循环的条件为Fori=3to1Step-1，即i从3递减到1，输出的“*”号也递减，每一次Print执行后，自动换行。最后输出的结果如选项A所示。

  • 第3题：

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

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


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

  • 第4题：

    在窗体上画一个名为Commandl的命令按钮，编写如下程序：程序运行后，单击命令按钮，输出的结果是（ ）。

    A. 4

    B. 5

    C. 6

    D. 8


    正确答案：A
    A)    【解析】本题考查数组中元素的分析。数组中的第k个元素的值为12-k，因此M(6)数据为6，M(8)为4。

  • 第5题：

    在窗体上画一个命令按钮，名称为Command1。然后编写如下程序： Private Sub Command1_Click() Dim j As Integer,s As Integer s=1 Do s=s+j j=j+1 Loop Until j＞=5 Print s End Sub 程序运行后，单击命令按钮，在窗体上输出的结果是( )。

    A．11

    B．1

    C．16

    D．7


    正确答案：A
    解析：当发生Command1_Click事件时，定义了一个变量j和一个变量s并给s赋值为1，执行Do…LoopUntil循环，此处需注意循环的结束条件是Until后面的条件为True。第一次执行循环体后，s的值为1，j的值为1，条件“j＞=5”为False，接着循环；第二次执行循环体后，s的值为2，j的值为2，条件“j＞=5”为False，接着循环；第三次执行循环体后，s的值为4，j的值为3，条件“j＞=5”为False，接着循环；第四次执行循环体后，s的值为7，j的值为4，条件“j＞=5”为False，接着循环：第五次执行循环体后，s的值为11，j的值为5，条件“j＞=5”为True，结束循环。输出的s的值为11。

相关内容