在窗体上有一个命令按钮Commandl和一个文本框Textl,编写事件代码如下: Private SuB cormmandl_Click() Dim i,j,x For i=i To 20 step 2 x=0 For j=1 To 20 st

admin2013-05-12  30

问题 在窗体上有一个命令按钮Commandl和一个文本框Textl,编写事件代码如下:
Private SuB cormmandl_Click()
Dim i,j,x
For i=i To 20 step 2
  x=0
  For j=1 To 20 step 2
   x=x+1
Next j
Next i
Text1.Value=Str(x)
End SuB
打开窗体运行后,单击命令按钮,文本框中显示的结果是

选项 A、1
B、7
C、17
D、400

答案A

解析 本题是一个双重循环,外循环中每循环一次,x的值都是从0开始累计,所以外循环中到最后一次循时,x的值是0,而内循环中的最后一次循环是j=20 to 20step 3所以此时内循环只循环一次,x的值为x=0+1=1,所以本题答案为A)。
转载请注明原文地址:https://jikaoti.com/ti/uqV0FFFM
0

最新回复(0)