网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
有如下程序段，该程序段执行完后，共执行循环的次数是 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
参考答案
更多 “ 有如下程序段，该程序段执行完后，共执行循环的次数是 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 ” 相关考题
考题
有如下程序段，该程序段执行完后，执行循环的次数是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=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
考题
有如下自定义过程： 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
考题
有如下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
定义一个数据类型
热门标签
最新试卷