[填空题] 下面程序的运行结果是 (14) 。程序的功能是 (15) 。
Public 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(15,15)
End Sub
E
![[填空题] 下面程序的运行结果是 (14) 。程序的功能是 (15) 。 Public Function myfun(m,n) Do while m＞n Do while m＞n:m=m-n:Loo](http://www.mshxw.com/aiimages/31/478936.png "[填空题] 下面程序的运行结果是 (14) 。程序的功能是 (15) 。 Public Function myfun(m,n) Do while m＞n Do while m＞n:m=m-n:Loo")
[填空题] 下面程序的运行结果是 (14) 。程序的功能是 (15) 。
Public 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(15,15)
End Sub
E
上一篇 [单项选择题] 以下程序段的输出结果为 Dim 1，a(10)，p(3) k=5 For i=0 To 10a(i)=i Next i For i=0 To 2P(i)=a(i*(i+1))
下一篇 [单项选择题] 设有以下函数过程 Private Function Fun(a()As Integer,b As String)As Integer End Function 若已有变量声明：
名师互学网 版权所有 (c)2021-2022 ICP备案号：晋ICP备2021003244-6号
