更多"单击命令按钮时,下列程序代码的运行结果为( )。
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. 0
B. 2
C. 4
D. 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
[单项选择]单击命令按钮时,下列程序代码的执行结果为 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
[单项选择]单击命令按钮时,下列程序的运行结果为( )。
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
[单项选择]单击窗体上Command1命令按钮时,执行如下事件过程: Private Sub Command1_Click( ) a$= "software and hardware" b$= Right(a$, 8) c$= Mtd(b$ 1, 8) Msgbox c$ End sub则在弹出的信息框的标题栏中显示的信息是( )。
A. software and hardware
B. software
C. hardware
D. and
[单项选择]单击命令按钮时,下列的执行结果为
Private Sub Command1_Click( )
Dim x As Integer,y As Integer
x=86:y=29
Call Proc(x,y)
Print x;y
End Sub
Public Sub Proc(n As Integer,ByVal m As Integer)
n=n Mod 10
m=m Mod 10
End Sub
A. 12 32
B. 6 29
C. 2 3
D. 12 3