在下面的程序中,要求循环体执行四次,请填空。Private Sub Commandl_Click()x=1Do While【 】x=x+2LoopEnd Sub
在下面的程序中,要求循环体执行四次,请填空。
Private Sub Commandl_Click()
x=1
Do While【 】
x=x+2
Loop
End Sub
相关考题:
设x和y均为整形变量,则执行程序中的循环后,y的值为x=1y=1Do While y =10 ThenExit DoE 设x和y均为整形变量,则执行程序中的循环后,y的值为 x=1 y=1 Do While y < = 50 If x>=10 Then Exit Do End If If (x Mod 2) = 1 Then x=x+5 End If If x Mod 2 <> 1 Then x=x-3 End If y=y+1 LoopA.2B.4C.6D.8
( 9 ) 下面的程序执行时 , 可以从键盘输入一个正整数 , 然后把该数的每位数字按逆序输出 。 例如 : 输入 7685 ,则输出 5867 ,输入 1000 ,则输出 0001 。请填空。Private Sub Command1_Click()Dim x As Integerx=InputBox( “ 请输入一个正整数 ” )While x_ _[11] ___Print x Mod 10;x=x\10WendPrint__ [12] __End Sub
阅读以下程序:Private Sub Form_click()Dim k, n, m As integern = 20m = 1k = 1Do While k <= nm=m+2k = k + 1LoopPrint mEnd Sub单击窗体程序的执行结果是【 】。
执行下面的程序段,x的值为 Private Sub Commandl_Click() For i=1 To 5 a=a+i Next i x=Val(i) MsgBox x End SubA.5B.6C.7D.8
下面的程序执行时,可以从键盘输入一个正整数,然后把该数的每位数字按逆序输出。例如:输入7685,则输出5 8 6 7;输人1000,则输出0 0 0 1。请填空。 Private Sub Command1_Click Dim x As Integer X=InputBox(“请输入一个正整数”) While x 【11】 Print x Mod 10; x=x\10 Wend Print 【12】 End Sub
在窗体中添加一个名称为Commandl的命令按钮,然后编写如下程序: Public x As Integer Private Sub Commandl_click() x=10 Call s 1 Call s 2 MsgBOx x End Sub Pfivate Sub s1() x=x+20 End Sub Private SubA.10B.30C.40D.50
下列程序段中循环体的执行次数是______。 int x=-12; while (x=0) x=x+1;A.While循环执行12次B.循环体语句执行一次C.循环是死循环D.循环体语句一次也不执行
单击命令按钮,下列程序的执行结果是 Private Sub Blck (x As Integer) x = x * 2 + l If x <6 Then Call Blck(x) End If x = x * 2 + 1 Print x; End Sub Private Sub Commandl_Click() Blck 2 End SubA.23 47B.10 36C.22 44D.24 50
以下能够正确计算n!的程序是( )。A.Private Sub Commandl_C1ick()B.hiVate Sub Commandl_C1ick() n=5:x=1 n=5:x=1:i=1 DO DO X=x*1 X=X*1 i=i+1 i=i+1 Loop while i<n Loop While<n Print x Ptinte x End Sub End SubC.Private Sub Commandl_Click ()D.Pdvate Sub Commandl C1ick() n=5:X=1:i=1 n=5=:x=1:i=1 DO DO X=X*1 X=X*1 i=i+1 i=i+1 Loop While i>n Print x Print x End Sub End Sub
单击命令按钮时,下列程序的执行结果是 Private Sub Commandl_Click( ) BT 4 End Sub PriVate Sub BT(x As Integer) X=X * 2 + 1 If x <6 Then Call BT(x) End If X=x * 2 Print x; End SubA.15B.16C.17D.18
单选题以下程序段中循环体的执行次数是()。 x=10; y=0; do{ y+=2; x-=2+y; }while(x=0);A1B2C3D4