设有如下程序Private Sub Command1 Click( )x=10:Y=0For i=l To 5Dox=x-2y=y+2Loop Until y5 Or x-lNex1End Sub运行程序,其中Do循环执行的次数是( )。A.15B.10C.7D.3

设有如下程序

Private Sub Command1 Click( )

x=10:Y=0

For i=l To 5

Do

x=x-2

y=y+2

Loop Until y>5 Or x<-l

Nex1

End Sub

运行程序,其中Do循环执行的次数是( )。

A.15

B.10

C.7

D.3


相关考题:

设有如下程序:Private Sub Form_Click()Dim i As Integer,x As String,Y As Stringx=”ABCDEFG”For i=4 To 1 Step-1y=Mid(x,i,i)+yNext iPrint yEnd Sub程序运行后,单击窗体,输出结果为A.ABCCDEDEFGB.AABBCDEFGC.ABCDEFGD.AABBCCDDEEFFGG

在窗体上画一个命令按钮,其名称为Command1,然后编写如下程序:Private Sub Command1_Click()Dim a(10)As IntegerDim x As IntegerFor i=1 To 10a(i)=iNext ix=1MsgBoxa(f(x)+x)End SubFunction f(y As Integer)y=y+2f=yEnd Function程序运行后,单击命令按钮,消息框的输出结果为______。

设有如下程序: Private Sub Form. Click( ) Dim i As Integer,x As String,y As String x="ABCDEFG" For i=4 To 1Step-1 y=Mid(X,i,i)+y Next i Print y End Sub 程序运行后,单击窗体,输出结果为( )。A.ABCCDEDEFGB.AABBCDEFGC.ABCDEFGD.AABBCCDDEEFFGG

没有如下程序Private Sub Commandl—Click()x=10:u=0For i=1 TO 5Dox=x-2y=y+2Loop Until y5 Or x一lNextEnd Sub运行程序,其中Do循环执行的次数是A.15B.10C.7D.3

设有如下通用过程: Public Function f(x As Integer) Dim y As Integer x=20 y=2 f=x*y End Function 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程; Private Sub Command1_Click() Static x As Integer x=10 y=5 y=f(x) Print x;y End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.10 5B.20 5C.20 40D.10 40

设有如下程序 Private Sub Command1 Click( ) x=10:Y=0 For i=l To 5 Do x=x-2 y=y+2 Loop Until yj Or x-l Nex1 End Sub 运行程序,其中Do循环执行的次数是( )。A.15B.10C.7D.3

设有如下通用过程: Public Function f(x As Integer) Dim y As Integer x=20 y=2 f=x*y End Function 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) Static x As Integer x=10 y=5 y=f(x) Print x;y End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是A.10 5B.20 5C.20 40D.10 40

设有如下程序: Private Sub Form. Click( ) Dim i As Integer,x As String,y As String x=ABCDEFGFor i=4 To 1Step-1y=Mid(X,i,i)+yNext iPrint yEnd Sub程序运行后,单击窗体,输出结果为( )。A.ABCCDEDEFGB.AABBCDEFGC.ABCDEFGD.AABBCCDDEEFFGG

(27)设有如下程序Private Sub Command 1_Click()x=10:Y=0For i=1 To SDox=x-2y=y+2Loop Until y>5 Or x<-1NextEnd Sub运行程序,其中Do循环执行的次数是A)15B)10C)7D)3