2. 计算机
  3. 假定有如下程序： Private Sub Form_Click() Dim N As Integer, J As Integer N = 0 J = 1 Do Until N > 2 N = N + 1

假定有如下程序： Private Sub Form_Click() Dim N As Integer, J As Integer N = 0 J = 1 Do Until N > 2 N = N + 1

admin2018-09-19  17
问题 假定有如下程序：
Private Sub Form_Click()
    Dim N As Integer, J As Integer
    N = 0
    J = 1
    Do Until N > 2
        N = N + 1
        J = J + N * (N + 1)
    Loop
    Print N; J
End Sub
运行程序，单击窗体，输出结果是
选项 A、3  21
B、3  7
C、0  1
D、3  13
答案A
解析 Do Until…Loop语句在条件满足的前提下会一直执行中间的循环语句。N的初值为0，因此循环会执行3次。在循环体内N每次被加1。因此结束时N=3。同样的方法可算出J=21。选A）。
转载请注明原文地址:https://jikaoti.com/ti/5gm0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)