在窗体上有一个命令按钮Command1和一个文本框Text1,事件代码如下: Private Sub Command1_Click() Dim i,j,x For i=1To20Step2 x=0 For j=iTo20Step3 x=x+1 Next j

admin2020-07-25  31

问题 在窗体上有一个命令按钮Command1和一个文本框Text1,事件代码如下:
Private Sub Command1_Click()
Dim i,j,x
For i=1To20Step2
x=0
For j=iTo20Step3
x=x+1
Next j
Next i
Text1.Value=Str(x)
End Sub
打开窗体运行后,单击命令按钮,文本框中显示的结果是(    )。

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

答案A

解析 题目中使用了双重For循环,外循环中每循环一次,x的值都是从0开始,因此外循环中到最后一次循环时,x的值是0;而内循环中的最后一次循环是j=20To20Step3,所以此时内循环只循环一次,x的值为x=0+1=1。Str函数将数值转换成字符串。
转载请注明原文地址:https://kaotiyun.com/show/H8cp777K
0

最新回复(0)