当前位置:IT认证>计算机二级

问题:

[单选] 在窗体上有一个命令按钮Commandl和一个文本框Textl,编写事件代码如下:
Private Sub Commandl一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.Textl.Value=Str(x)
End Sub
打开窗体运行后,单击命令按钮,文本框中显示的结果是(  )。

A . 1
B . 7
C . 17
D . 400

在长度为n的线性表中,降序排列,则寻找最大项最少需要的软(  )次。 1。 n。 n2。 n/Z。 在窗体上有一个命令按钮Commandl,编写事件代码如下: Private Sub Commandl Click(  ) Dim dl As Date Dim d2 As Dated1=#12/25/2009#d2=#1/5/2010#MsgBox DateDiff(”ww”,d1,d2)End Sub打开窗体运行后,单击命令按钮,消息框中输出的结果是(  )。 1。 2。 10。 11。 在窗体上有一个命令按钮Commandl,编写事件代码如下:Private Sub Commandl Click(  ) Dim X As Integer,Y As Integerx=12:y=32  Call Proc(x,Y)Debug.Print X;YEnd SubPublic Sub proc(n As Integer,ByVal in As Integer)n=n Mod 10m=m Mod 1OEnd Sub打开窗体运行后,单击命令按钮,立即窗口上输出的结果是(  )。 232。 123。 22。 1232。 由“For i=1 T09 Step-3”决定的循环结构,其循环体将被执行(  )。 0次。 1次。 4次。 5次。 在窗体上有一个命令按钮Commandl和一个文本框Textl,编写事件代码如下:
Private Sub Commandl一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.Textl.Value=Str(x)
End Sub
打开窗体运行后,单击命令按钮,文本框中显示的结果是(  )。
参考答案:

  参考解析

A。【解析】由于外层循环体中有语句x=0所以无论内循环结束时X为多少,它都将被重新赋值0,所以只有最后一次i=19,j=19此时x值为l,由于i的步长为2,21不符循环条件,退出整个循环。故文本框中的结果为l。

在线 客服