单击命令按钮时,下列程序代码的执行结果为 Public Sub Procl(n As Integer,ByVal m As integer) n=n Mod 10 m=m\10 End sub Private Sub Commandl_Click() Dim x AS Integer,y AS Integer x=12:y=24 Call Procl(x,y) Print x;y End subA.12 24B.2 24C.2 3D.12 2

单击命令按钮时,下列程序代码的执行结果为 Public Sub Procl(n As Integer,ByVal m As integer) n=n Mod 10 m=m\10 End sub Private Sub Commandl_Click() Dim x AS Integer,y AS Integer x=12:y=24 Call Procl(x,y) Print x;y End sub

A.12 24

B.2 24

C.2 3

D.12 2


相关考题:

单击命令按钮时,下列程序代码的执行结果为 ______。 Public Sub Procl(n As Integer,ByVal m As Integer) n=n Mod 10 m=m/10 End Sub Private Sub Command1_Click() Dim x As Integer,y As Integer x=12: y=34 Call Procl(x,y) Print x;y End SubA.12 34B.2 34C.2 3D.12 3

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

单击命令按钮时,下列程序代码的执行结果为_________。 Public Sub Procl(n As Integer,By Val m As Integer) n=n Mod i() m=m/10 End Sub Private Sub Command1 CliCk() Dim x As Integer,y As Integer x=12:y=34 Call Procl(x,y) Print x;y End SubA.12 34B.2 34C.2 3D.12 3

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

单击命令按钮时,下列程序代码的执行结果为______。Public Sub Procl (n As Integer,ByVal m As Integer) n= n Mod 10 m=m/10End SubPrivate Sub Conunand1_Click() Dim x As Integer,y As Integer x=12:y=34 Call Procl(x,y) Print x;yEnd SubA.12 34B.2 34C.2 3D.12 3

单击命令按钮时,下列程序代码的执行结果为______。 Public Sub Procl(n As Integer,ByVal m As Integer) n=n Mod 10 m=m/10 End Sub Private Sub Command1_Click() Dim x As Integer,y As Integer x=12:y=34 Call Procl(x,y) Print x;y End SubA.12 34B.2 34C.2 3D.12 3

单击命令按钮时,下列程序代码的执行结果为( )。 Private Sub Procl(nAs Integer,ByValmASInteger) n=nMod 10 m=m\10 End Sub PrivateSubCommandl_Click() Dimx As Integer Dimy As Integer x=12 y=34 CallProcl(x,y) Printx;y End SubA.12 34B.2 34C.2 3D.12 3

单击命令按钮时,下列程序代码的执行结果为______。 Public Sub Procl(n As Integer, By Val m As Integer) n=n Mod 10 m=m/10 End Sub Private Sub Command1_Click() Dim x As Integer,y As Integer x=12:y=34 Call Procl(x, y) Print x; Y End SubA.12 34B.2 34C.2 3D.12 3

单击命令按钮时,下列程序代码的执行结果为 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 mn:m=m—n:Loop DO While m<n:n=n-m:Loop Loop My Func=m End FunctionA.2B.4C.6D.8