单项选择题
单击命令按钮时,下列程序的运行结果为 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
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
单击命令按钮时,下列程序代码的执行结果为 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
点击查看答案&解析
单项选择题
单击命令按钮时,下列程序代码的执行结果为 Public Sub proc1(n As Integer,Byva1 m As Integer) n=n Mod 10 m=m Mod 10 End Sub Private Sub Cmmand1_Click( ) Dim x As Integer,y As lngeger x=12:y=12 Call Proe1(x,y) Print x;y End Sub
A.12 2
B.2 12
C.2 2
D.12 12
点击查看答案&解析
相关试题
设在工程中有一个标准模块,其中定义了如下...
在窗体中添加一个名称为Lablel1的标签、两...
建立随机文件TEST.DAT,存放学生的姓名和...
数据库理论中,数据的独立性一般可分为 【...
下面的程序用于根据文本框Text中输入的内容...