单项选择题

有如下程序段,该程序段执行完后,共执行循环的次数是
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 Static Function Fac(n As Integer)As Integer Dim f As Integer f=f+n Fac=f End Function Private Sub Form_Click( ) Dim I As Integer For 1=2 To 3 Print # ;I&“=”&Fac(1) Next I End Sub 程序运行后,单击窗体,在窗体上显示的是
A.#2=2  
#3=3
B.#2=2
#3=5
C.#;2=2
#;3=3
D.#;2=2
#3;=5
单项选择题
单击命令按钮时,下列程序的运行结果为 Private Sub Command1_Click( ) Print MyFund(20,18) End Sub Public Function MyFund(m As Integer,n As Integer)As Integer Do While m◇n Do While m>n:m=m-n:Loop Do While m<n:n=n-m:Loop Loop MyFund=m End Function
A.0
B.2
C.4
D.6
相关试题
  • D.5
  • 软件测试的目的是
  • 算法的时间复杂度是指
  • 下列程序段的执行结果为 X=5 Y=-20...
  • Dim a(3,-3 to 0,3 to 8)As...