有如下程序,运行结果是( )。 Public Function fun(m%, n%) As Integer Do r = m Mod n m = n n = r Loop Until r = 0 fun = m End Function Private Sub Command1_Click() Print fun(12, 44) End Sub
A. 4
B. 程序出错
C. 6
D. 2
设有以下函数过程 Private Function Fun(a() As Integer, b As String) As Integer … End Function 若有变量声明: Dim x(10) As Integer, n As Integer, ch As String 则下面正确的语句是( )。
A. Call fun x,"ch"
B. x(0) = Fun(x, "ch")
C. n = Fun(x(10), ch)
D. n = Fun(n, ch)