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

admin2021-02-23  31

问题 在窗体上有一个命令按钮Command1和一个文本框Text1,编写事件代码如下:
    Private Sub Command1_Click()
    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=l To 20 step 2”变量i的初值为1,终值为20,步长为2,循环条件符合,执行语句“x=0”,为变量x赋值为0,从这里可以看出,无论循环执行多少次,在执行循环体时,x的值都将还原为0,通过这一点可知,最后一次循环的结果即为整个程序的运行值。再来看整个程序,第二个For循环“For i=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://kaotiyun.com/show/8WSp777K
0

最新回复(0)