单项选择题

下列程序的输入值分别为100,10则执行结果为非作歹______ 。
m=Val (inputbox (“请输入数学1”) )
n=Val (inputbox (“请输入数学2”) )
If n*m=0 Then
MsgBox “两数能不能为0”
Exit Sub
If m＜n Then
t=m: m=n: n=t
End If
End If
DO
R=m Mod n
m=n
n=f
Loop While r＜＞0
Print m

A．10
B．100
C．50
D．250
<上一题 目录 下一题>
热门 试题

单项选择题
单击命令按钮时，下列程序代码的执行结果为______ 。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
单项选择题
有如下函数:Private Function firstfunc(x As Integer, y As Integer) As Integer Dim n As Integer Do While n ＜= 4 x=x +y n=-+1 Loop firstfunc = x End Function调用该函数的事件过程如下:Private Sub Command1_lick() Dim x As Integer Dim y As Integer Dim n As Integer Dim z As Integer x=1 y=1 For n = 1 To 3 z = firstfunc(x, y) Next n Print z End Sub该事件过程的执行结果是 ______。
A．1
B．3
C．16
D．9
相关试题