单项选择题

单击命令按钮时，下列程序的运行结果为
Private Sub Command1_Click( )
　Print MyBM(23，18)
End Sub
Public Function MyBM(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
　MyBM=m
End Function

A．0
B．1
C．3
D．5
<上一题 目录 下一题>
热门 试题

单项选择题
有如下的程序：Private Sub Command1_Click( ) Dim k As Integer，m As Integer Dim P As Integer k=4：m=1 P=Pid(k，m) ：Print P； P=Pid(k，m) ：Print PEnd SubPrivate Function Pid(a As Integer，b As Integer) Static m As Integer，i As Integer m=5：i=2 i=i + m + 1 m=i + a + b Pid=m 2End Function单击命令按钮后，输出结果为
A．2 2
B．4 4
C．5 5
D．6 6
单项选择题
在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click( ) Dim m As Integer，n As Integer，p As Integer m=3：n=5：p=O Call Y(m，n，p) Print Str(p)End SubSub Y(ByVal i As Integer，ByVal j As Integer，k As Integer) k=i + jEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是
A．4
B．6
C．8
D．10
相关试题