2. 计算机
  3. 在窗体上有一个命令按钮Command1和一个文本框Text1，编写事件代码如下： Private Sub Command1Click() Dim i, j, x For i = 1 To 20 Step 2 x = 0 For j = i To 20 St

在窗体上有一个命令按钮Command1和一个文本框Text1，编写事件代码如下： Private Sub Command1Click() Dim i, j, x For i = 1 To 20 Step 2 x = 0 For j = i To 20 St

admin2019-02-19  49
问题 在窗体上有一个命令按钮Command1和一个文本框Text1，编写事件代码如下：
Private Sub Command1Click()
Dim i, j, x
For i = 1 To 20 Step 2
x = 0
For j = i To 20 Step 3
x = x + 1
Next j
Next i
Text1.Value = Str(x)
End Sub
打开窗体运行后，单击命令按钮，文本框中显示的结果是(          )。
选项 A、1
B、7
C、17
D、400
答案A
解析 事件代码中有两个for循环，第一个for循环"For i = 1 To 20 step 2"变量i的初值为1，终值为20，步长为2，循环条件符合，执行语句"x=0"，为变量x赋值为0，从这里可以看出，无论循环执行多少次，在执行循环体时，x的值都将还原为0，通过这一点可知，最后一次循环的结果即为整个程序的运行值。再来看整个程序，第二个For循环"For j = i To 20 step 3"，初值为i，终值为20，步长为3，那么可以知道，当i=1时，第二个循环执行7次；当i=3时，第二个循环执行6次，依次类推，当i=19时，第一个循环最后一次执行，那么把i=19代入到第二个循环中：当i=19时，j=19，x=0+1=1。此时j=j+3=19+3=22，22>20，循环条件不成立，循环结束。至此，第一个for循环和第二个for循环都运行结束，所以x=1，通过语句"Text1.Value = Str(x)"将字符1显示在窗体的文本框中。所以本题答案为A。
转载请注明原文地址:https://www.kaotiyun.com/show/hh0p777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

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