2. 计算机
  3. 在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，并编写如下事件过程： Private Sub Command1_Click() Dim i As Integer, a As Integer, j As Integer

在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，并编写如下事件过程： Private Sub Command1_Click() Dim i As Integer, a As Integer, j As Integer

admin2015-06-30  22
问题 在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，并编写如下事件过程：
Private Sub Command1_Click()
  Dim i As Integer, a As Integer, j As Integer
  For i = 1 To 2
      a = 0
      j = 1
      Do Until j > i + 1
          a = a + 1
          j = j + 1
      Loop
  Next
  Text1.Text = a
End Sub
当程序运行过程中，单击Command1后，在Text1中的输出结果为
选项 A、3
B、2
C、1
D、0
答案A
解析 Do Until…Loop，当程序开始执行时，先计算循环"条件"值，当条件为真时结束循环，否则执行循环体。外层For循环，循环变量i的取值从1到2。当i=1时，a=0，j=1，进入Do Until内层循环，循环条件1>1+1为假，执行循环体，a=0+1=1，j=1+1=2，内层循环继续执行，循环条件2>1+1为假，执行循环体，a=1+1=2，j=2+1=3，再计算内层循环条件3>1+1为真，退出内层Until循环体；当i=2时，a=0，j=1，进入Do Until内层循环，循环条件1>2+1为假，执行循环体，a=0+1=1，j=1+1=2，内层循环继续执行，循环条件2>2+1为假，执行循环体，a=1+1=2，j=2+1=3，内层循环继续执行，循环条件3>2+1为假，执行循环体，a=2+1=3，j=3+1=4，再计算内层循环条件4>2+1为真，退出内层Until循环体，再退出For循环，故a=3。正确答案为选项A。
转载请注明原文地址:https://kaotiyun.com/show/i8Qp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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