在窗体上有一个命令按钮Command1和一个文本框Text1,编写事件代码如

在窗体上有一个命令按钮Command1和一个文本框Text1,编写事件代码如下:Private Sub Command1_Click(.Dim i, j, xFor i = 1 To 20 Step 2x = 0For j = i To 20 Step 3x = x + 1Next jNext iText1.Value = Str(x.End Sub打开窗体运行后,单击命令按钮,文本框中显示的结果

问题:

[单选] 在窗体上有一个命令按钮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 = 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。

联系我们

联系我们

查看联系方式

邮箱: 2643773075@qq.com

工作时间:周一至周五,9:00-17:30,节假日休息

关注微信
微信扫一扫关注我们

微信扫一扫关注我们

返回顶部