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

admin2020-11-25  31

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

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

答案A

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

随机试题
最新回复(0)