有如下程序段,该程序段执行完后,共执行循环的次数是 Private Sub Command1_Click( ) Tota1=0 Counter=1 Do Print Counter Tota1=tota1+Counter Print total Counter=Counter+1 If total=10 Then Exit Do End lf Loop While Counter<=10 End SubA.5B.10C.12D.20

有如下程序段,该程序段执行完后,共执行循环的次数是 Private Sub Command1_Click( ) Tota1=0 Counter=1 Do Print Counter Tota1=tota1+Counter Print total Counter=Counter+1 If total>=10 Then Exit Do End lf Loop While Counter<=10 End Sub

A.5

B.10

C.12

D.20


相关考题:

执行下面的程序段,x的值为【 】。Private Sub Command1_Click()For i=1 To 9a=a+iNextx=Val(i)MsgBox xEnd Sub

有如下程序段,该程序段执行完后,执行循环的次数是total=0Counter=1DoPrint Countertotal=total + CounterPrint totalCounter=Counter + 1If total 10 ThenExit DoEnd IfLoop While Counter =10( )。A.5B.10C.15D.20

( 14 )执行以下程序后输出的是Private Sub Command1_Click()Ch$= ” AABCDEFGH ”Print Mid(Righ(ch$,6),Len(left(ch$,4)),2)End SubA)CDEFGHB)ABCDC)FGD)AB

执行下面的程序段,x的值为 。private Sub Command1_Click()For i=1 To 5 a=a+iNext iX=Val(i)msgBox xEnd SubA.5 B.6 C.7 D.8

在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim Y as StringX=5Y=X Space(3) XPrint X;Print Trim(Y);Len(Trim(Y))End Sub该程序的执行结果是【 】。

有如下程序,执行程序后单击Button1按钮,窗体上显示的是什么()Private Sub Command1_Click()Dim a Dim b As Integera = 5 / 2b = 5 / 2Print a, bEnd Sub A、2 2B、 2 2.5C、 2.5 2D、 2.5 2.5

在下面的程序中,要求循环体执行四次,请填空。Private Sub Command1_Click()x=1Do While 【 】x=x+2LoopEnd Sub

设有如下程序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()j =10For i= -1 To 1 Step 0.3j =j + 1Next iPrint jEnd Sub该程序共循环【 】次,程序执行完毕后j的值是【 】。

有如下过程:Sub SS(ByVal X,ByRef Y,Z)X=X + 1Y=Y + 1Z=Z + 1End Sub执行该过程的事件过程如下:Private Sub Command1_Click()A = 1B = 2C = 3Call SS(A,B,C) Print A;B;CEnd Sub则该程序的执行结果是【 】。

没有如下程序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

有如下的程序段,该程序段执行完后,共执行的循环次数是 total=0 Counter=1 Do Print Counter total=total * Counter + 1 Print total Counter=Counter +1 If total > 10 Then Exit Do End If Loop While Counter<=10A.4B.10C.15D.20

以下程序段中Do...Loop 循环执行的次数为【 】。程序执行完毕后,n的值为【 】。Private Sub Command1_Click()n =5DoIf n Mod 2= 0 Thenn =n \2Elsen =n* 3 + 1End IfLoop Until n=1End Sub

有如下程序段,该程序段执行完后,执行循环的次数是 total=0 Counter=1 Do Print Counter total=total + Counter Print total Counter=Counter+1 If total>10 Then Exit Do End If Loop While Counter <=10A.5B.10C.15D.20

执行下列程序,输入框中显示的默认字符串为【 】。Private Sub Command1_Click( )InputBox "Ok" , "输入参数", Format(" H12" )End Sub

有如下的程序段,该程序段的执行完后,共执行循环的次数是 Private Sub Command1_Click() total=0 Counter=l Do Print Counter total=total+Counter Print total Counter=Counter+1 If total>=10 Then Exit Do End If Loop While Counter<=10 End SubA.5B.10C.12D.20

现有如下一段程序:Option base 1Private Sub Command1_Click()Dim aa=Array(3,5,7,9)X=1For i=4 to 1 step -1s=s+a(i)*xX=x*10NextPrint sEnd Sub执行程序,单击Command1命令按钮,执行上述事件过程中,输出结果是A)9753B)3579C)35D)79

有如下程序段:执行该程序后,x的值为( )。A.trueB.falseC.0D.1

有如下自定义过程: Sub test(x As Integer) x =X *2+1 If x<6 Then Call test(x) End If x=x* 2 + 1 Print x; End Sub调用该过程的事件过程如下:Private Sub Command1_Click() test 2End Sub则该段程序的执行结果是______ 。A.12B.23 47C.23D.5 10

在窗体上画了两个按钮控件Command1和Command2,有如下程序: Private Sub Command1_Click() Print "Visual"; End Sub Private Sub Command2_Click() Print "Basic"; End Sub Private Sub Form_Load() CommandCancel=True Command1.Cancel=True End Sub 执行程序后,按键盘Cancel键,在窗体上输出的结果是A.BasicB.VisualC.CancelD.True

在窗体中添加一个命令按钮,并编写如下程序: Private Sub Command1_CliCk() X=1∶Y=2∶Z=3 X=Y∶Y=Z∶Z=X Print Z End Sub 程序执行后,输出的结果是______。A.3B.0C.2D.1

设有如下程序 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

有如下程序段:执行该程序段后,X的值为( )。A.trueB.falseC.0D.1

当数控系统在()控制方式时,执行程序的一个程序段后停止,如果再按循环启动按钮,则执行完下一个程序段后,停止。A、空运转B、单程序段C、跳过任选程序段D、进给保持

有如下VB程序段: Private Sub Command1_Click() Dim a As Long a=Val(Text1.Text) Print a End Sub 其中"Private Sub Command1_Click()"的作用是()。A、定义一个数据处理方法B、定义一个数据输入方法C、定义一个事件过程D、定义一个数据类型

有如下程序段: int total = 0; for ( int i = 0; i  4; i++ ){ if ( i == 1) continue; if ( i == 2) break;total += i;} 则执行完该程序段后total的值为()A、0B、1C、3D、6

单选题有如下VB程序段: Private Sub Command1_Click() Dim a As Long a=Val(Text1.Text) Print a End Sub 其中"Private Sub Command1_Click()"的作用是()。A定义一个数据处理方法B定义一个数据输入方法C定义一个事件过程D定义一个数据类型