首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
单击命令按钮时,下列程序的运行结果为 Private Sub Command1_Click() Print MyFund(20,18) End Sub Public Function MyFund(m As Integer,n As Inte
单击命令按钮时,下列程序的运行结果为 Private Sub Command1_Click() Print MyFund(20,18) End Sub Public Function MyFund(m As Integer,n As Inte
admin
2013-01-23
79
问题
单击命令按钮时,下列程序的运行结果为 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
答案
2
解析
此题程序代码中,被调过程采用了Do While…Loop的嵌套语句结构,主调过程只调用了一次被调过程,Print MyFund(20,18)语句表明,程序最后输出的只是被调过程的返回值。主调过程在调用被调过程MyFund时,把数值20,18分别传给形参m和n,从被调过程中的循环语句来看,因为此时m的值大于n的值,所以执行语句m=m -n,m值变为2,而由语句MyFund=m可看出,此过程的返回值就是m的值,即2。
转载请注明原文地址:https://kaotiyun.com/show/Erhp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
用下列语句定义数组的元素个数是()。OptionBase1DimArr5(0to6,0to5)AsInteger
下列程序执行后,n的值为n=0ForI=1To200IfIMod4=0Thenn=n+1NextI
在窗体中添加一个命令按钮,名称为Command1;添加一个文本框,名称为Textl,然后编写如下程序:PrivateSubCommand1_Click()Dima(5),b(5)Forj:1
执行以下Command1的Click事件过程在窗体上显示OptionBase1PrivateSubCommand1_Click()Dimaa=Arra
在窗体上画一个文本框,然后编写如下代码:OptionBase1PrivateSubForm_Click()DimarrDimStartAsInteger,FinishAsInteger
对数据元素序列(49,72,68,13,38,50,97,27)进行排序,前3趟排序结束时的结果依次为,第1趟:13,72,68,49,38,50,97,27:第2趟:13,27,68,49,38,50,97,72;第3趟:13,27,38,49,68,
在窗体上画两个命令按钮,然后编写以下代码:PrivateSubCommandl_Click()DimiAsLongDimiAsIntegerDimxFori=1
以下关于MDI子窗体在运行时特性的叙述,错误的是()。
在关系数据库中,元组的集合称为关系。通常标识元组的属性或最小属性组称为()。
在VisualBasic中,要设置菜单项的快捷访问键,应使用的符号是______。
随机试题
试述公共关系的内涵及任务。
药师在指导合理用药时应正确的交代给药途径和给药方法。下列交代的内容,错误的是()
麻醉药品的种植和生产单位对成品、半成品、罂粟壳及种子等必须
走私下列哪一选项的物品.构成走私普通货物物品罪?()
美国、加拿大输华货物,须提供官方出具的符合要求的植物检疫证书或出口商出具的“非针叶树木质包装声明”或“非木质包装声明”方可受理报检。( )
甲企业采用移动加权平均法计算发出甲材料的成本,2016年4月1日,甲材料结存300千克,每千克实际成本为3元;4月3日,发出甲材料100千克;4月12日,购入甲材料200千克,每千克实际成本10元;4月27日,发出甲材料350千克,4月末该企业甲材料的期末
有一些植物需经过低温后才能开花并成长结实。通过低温诱导促使植物开花结实的作用称为春化作用。根据上述定义,下列未利用春化作用原理的是()。
下面是某求助者的WAIS—RC的测验结果:在WAIS—RC中,各分测验量表分采用()。
不同年龄阶段心理增长与衰退趋势不同,老年期()。
如何从文化多样性角度看待“文化遗产”?
最新回复
(
0
)