当发生窗体的单击事件时,输出的第二行为( )。 Private Sub Form_click() Dim N1 As Integer,N2 As Integer,N3 As Integer N1=1:N2=1 Print N1;N2 Do N3=N1+N2 Print N3; N1=N2:N2=N3 Loop Until N3>=5 End SubA.1 1 1B.2 3 5C.2 5 7D.2 3 4

题目

当发生窗体的单击事件时,输出的第二行为( )。 Private Sub Form_click() Dim N1 As Integer,N2 As Integer,N3 As Integer N1=1:N2=1 Print N1;N2 Do N3=N1+N2 Print N3; N1=N2:N2=N3 Loop Until N3>=5 End Sub

A.1 1 1

B.2 3 5

C.2 5 7

D.2 3 4


相似考题
参考答案和解析
正确答案:B
解析:此处需注意的是,DO…LoopUntil循环的结束条件是Until后面的表达式值是True。当发生窗体的单击事件时,首先给变量N1和N2赋值为1,然后输出为12并换行。执行循环,N3的值为2,输出2不换行,进行赋值后N1的值为1,N2的值为2,判断条件“2>=5”为False,重新执行循环:第二次执行循环输出N3的值为3,循环结束条件依旧为False;第三次执行循环输出N3的值为5,循环结束条件为True,循环退出。所以输出的第二行为“235”。
更多“当发生窗体的单击事件时,输出的第二行为()。Private Sub Form_click()Dim N1 As Integer,N2 As In ”相关问题
  • 第1题:

    设有以下窗体单击事件过程:

    打开窗体运行后,单击窗体,则消息框的输出内容是( )。


    正确答案:5
    5 解析: 本题考查的是VBA中的控制结构。SelectCase结构运行时,首先计算“表达式”的值,它可以是字符串或者数值变量或表达式。然后会依次计算测试每个Case表达式的值,直到值匹配成功,程序会转入相应Case结构内执行语句。本题中,当i=1和3的时候,执行a=a+1,当i=2时,执行a=a+2,所以a=1+1+2+1=5。

  • 第2题:

    图所示的桁架,当仅增大桁架高度,其他条件不变时,对杆1和杆2的内力影响是(  )。


    A、N1,N2均减少
    B、N1,N2均不变
    C、N1减少,N2不变
    D、N1增大,N2不变

    答案:C
    解析:
    由左端节点受力平衡可知,左侧水平杆的内力与Fp之比等于桁架单格宽与桁架高度之比,故当增大桁架高度时,该水平杆内力减少,再由该杆右端结点水平向受力平衡可知,该水平杆内力等于杆1的内力,故杆1内力减少;由杆2上端节点竖直方向受力平衡可知,杆2内力为Fp,其大小不受桁架尺寸变化的影响。

  • 第3题:

    2、窗体的Load事件,在 时候触发。

    A.当应用程序启动后

    B.当鼠标单击窗体时

    C.当鼠标双击窗体时

    D.当窗体变成活动窗体时

    E.当改变窗体的大小时


    当应用程序启动后

  • 第4题:

    以下说法错误的是______。

    A.控件的名称可以由用户自己设定

    B.窗体的事件名称可以由用户编程时设定

    C.单击窗体时,会触发Form_Click事件

    D.输入字符时,会触发KeyPress事件


    正确答案:B

  • 第5题:

    窗体的Click事件,在()时候触发。

    A.当鼠标单击窗体时

    B.当应用程序启动后

    C.当键盘按下时

    D.当改变窗体的大小时


    Load