单击命令按钮时，下列程序代码的运行结果为 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 FunctionA．0B．2C．4D．6

题目

单击命令按钮时，下列程序代码的运行结果为 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

相似考题

1.程序运行后，单击命令按钮Command1时的输出结果为（ ）。A.A(5)=5B.A(5)=10C.A(5)=20D.A(5)=40

2.单击命令按钮时，下列程序代码的运行结果为 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 FunCtionA．0B．2C．4D．6

3.单击一次命令按钮之后，下列程序代码的执行结果为______。 Private Sub Command1_ Click() a = fun(4) + fun(5) Print a; End Sub Public Function fun (n As Integer) Static Num For i = 1 To n Num = Num + i Next i fun = Num End FunctionA．15B．20C．35D．40

4.单击命令按钮之后，下列程序代码的执行结果为______。 Private Function P(N As Integer) Static sum For I=I To N Sum = sum +1 Next I P =sum End Function Private Sub Command1_Click() S=P(1)+P(2)+P(3)+P(4) Print S： End SubA．20B．30C．115D．135

更多“单击命令按钮时,下列程序代码的运行结果为Private Sub Command1_Click() Print MyFunc(20, 18)En ”相关问题

  • 第1题：

    单击命令按钮时，下列程序代码的执行结果为______ 。Public Function MyFune(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=mEnd FunctionPrivate Sub Command1_Click() Print MyFunc(24, 18)End Sub

    A． 2

    B．4

    C．6

    D．8


    正确答案：C

  • 第2题：

    单击命令按钮时，下列程序的运行结果为 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


    正确答案：B
    解析：程序代码被调过程采用了DoWhile…Loop的嵌套语句结构，主调过程只调用了—次被调过程，PrintMyFund(20，18)语句表明，程序最后输出的只是被调过程的返回值。主调过程在调用被调过程MyFund时，把数值20，18分另"专给形参m和n，从被调过程中的循环语句来看，因为此时m的值大于n的值，所以执行语句m=m-n，m值变为2，而由语句MyFund=m可以看出，此过程的返回值就是m的值，即2。

  • 第3题：

    单击命令按钮时，下列程序代码的运行结果为（）。 Public Sub Procl（ByVal n As Integer, m As Integer) n = n Mod 10 m = m 10 End Sub Private Sub Command1_Click（) Dim x As Integer, y As Integer x = 23 y = 65 Call Procl（x, y) Print x; y End Sub

    A．3 65

    B．23 6

    C．3 60

    D．0 65


    B B)【解析】本题考查循环程序的分析。在函数Funcl中，程序主要由一条嵌套的循环语句构成，如果m$amp;

  • 第4题：

    单击命令按钮时，下列程序的运行结果为 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


    正确答案：B
    解析：此题程序代码中，被调过程采用了DoWhile…Loop的嵌套语句结构，主调过程只调用了一次被调过程，PrintMyFund(20，18)语句表明，程序最后输出的只是被调过程的返回值。主调过程在调用被调过程MyFund时，把数值20，18分别传给形参m和n，从被调过程中的循环语句来看，因为此时m的值大于n的值，所以执行语句m=m-n，m值变为2，而由语句MyFund=m可看出，此过程的返回值就是m的值，即2。

  • 第5题：

    单击命令按钮时，下列程序代码的执行结果为 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


    正确答案：C
    解析：根据Myfune的定义，当m与n不相等时执行D。循环，此时如果m大于n，则执行m=m-n的Do循环。据此，MyFune(24，18)的值应该为24减去18。

相关内容