更多"单击命令按钮时，下列程序代码的运行结果为( )。
Priv"的相关试题:
[单项选择]单击命令按钮时，下列程序代码的运行结果为( )。
Private Sub Command1_Click（ ）
print MyFunc(20，18)
End Sub
Public Function MyFunc (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
MyFunc=m
End FunCtion
A. Dim gg[1，5]As String
B. Dim gg[1 To 5，1 To 5]As String
C. Dim gg(1 To 5)As String
D. Dim gg[1：5，1：5]As String
[单项选择]单击命令按钮时，下列程序代码的运行结果为
Private Sub Command1_Click（ ）
Print MyFunc(20, 18)
End Sub
Public Function MyFunc(m As Integer, n As Integer)As Integer
Do While m＜＞n
Do While m＞n:m=m-n:Loop
Do Whle m＜n:n=n-m:Loop
Loop
MyFunc=m
End Function
A. 0
B. 2
C. 4
D. 6
[单项选择]单击命令按钮时，下列程序代码的执行结果为
Private Sub Command1_Click( )
Print MyFunc(24，18)
End Sub
Public Function MyFunc(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
My Func=m
End Function
A. 2
B. 4
C. 6
D. 8
[单项选择]单击命令按钮时，下列程序的运行结果为
Private Sub Command1_Click（ ）
Print Fun(23，18)
End Sub
Public Function Fun(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
Fun=m
End Function
A. 0
B. 1
C. 3
D. 5
