单项选择题
下列程序的运行结果是( )。
Private Function myfun(m, n)
Do While m > n
Do While m>n:m=m-n:Loop
Do while n>m:n=n-m:Loop
Loop
myfun=m
End Function
Private Sub Command1_Click()
Print myfun(9, 8)
End Sub
A.2
B.1
C.4
D.3
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
某程序列表框中有许多项,现在用Timer控件控制时间,0.1秒删除一项,直到删完为止,用一滚动条来显示删除的项目,请选择合适的语句,完成此程序( )。 Private Sub Command2_Click() HScro111.Min=0 HSero111.Max=List1.ListCount HScro111.Value=0 Timer1.Interval= Timer1.Enabled=True End SubPrivate Sub Timer1_Timer() If List1.ListCount>0 Then List1.RemoveItem 0 HScro111.Value=HScrolll.Max-List1.ListCount Else Timer1.Enabled= End If End Sub
点击查看答案&解析
单项选择题
对长度为n的线性表进行顺序查找,在最坏情况下需要比较的次数为( )。
A.125
B.n/2
C.n
D.n+1
点击查看答案&解析
相关试题
假设有以下程序段: For i= 1 To 3...
滚动条的最小值属性是______,最大值...
下列是一个体操评分程序。设满分为10分,...
在程序的空白行处填写适当的语句,完成下列...
软件是程序、数据和______的集合。