首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下的一个函数过程: Function fn(ByVal num As Long) Dim k As Long k=1:num=Abs(num) Do While num k=k*(num Mod
有如下的一个函数过程: Function fn(ByVal num As Long) Dim k As Long k=1:num=Abs(num) Do While num k=k*(num Mod
admin
2018-12-20
56
问题
有如下的一个函数过程:
Function fn(ByVal num As Long)
Dim k As Long
k=1:num=Abs(num)
Do While num
k=k*(num Mod 10)
num=Bum\10
Loop
fn=k
End Function
通过以下事件过程调用该函数,程序运行后,在输入对话框中输入数字“123”,则运行结果为( )。
Private Sub Commandl_Click()
Dim n As Long
Dim r As Long
n=InputBox(”请输入一个数值”)
n=CLng(n):r=fn(n)
Print r
End Sub
选项
A、12
B、6
C、3
D、1
答案
B
解析
本题考查函数功能分析。定义函数过程fn时,在参数前加上ByVal表明参数为传值调用。函数fn的主要功能为取出num的每一位,进行累计相乘,然后返回结果。
转载请注明原文地址:https://kaotiyun.com/show/dVFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=10y=20Callfun1(x,y)Printx;yEnd
下面有关标准模块的叙述中,错误的是( )。
窗体上有1个名称为Command1的命令按钮,事件过程如下:PrivateSubCommand1_Click() m=-3.6 IfSgn(m)Then n=Int(m) Else n=Abs(m) EndIf
设窗体上有2个直线控件Line1和Line2,若使两条直线相连接,需满足的条件是( )。
以下关于控件数组的叙述中,错误的是( )。
以下关于控件数组的叙述中,错误的是( )。
窗体上有一个由两个文本框组成的控件数组,名称为Text1,并有如下事件过程:PrivateSubText1_Change(IndexAsInteger) SelectCaseIndex Case0 Text1(1).
软件设计中划分模块的一个准则是( )。
软件设计中模块划分应遵循的准则是( )。
假定有以下程序段:Fori=1To3 Forj=5To1Step-1 Printi*j NextjNexti则语句Printi*j的执行次数是( )。
随机试题
一个进程要向另一个进程发送大量数据,效率最高、使用最方便,且不需要另外的同步机制支持的进程间的通信机制为_______。
男孩,15岁,因双侧颞下颌关节强直已行颞下颌关节假关节成形术,开始张口训练的时间应是术后
A.糊丸B.滴丸C.小蜜丸D.大蜜丸E.包衣滴丸除另有规定外,应在30分钟内全部溶散的丸剂是()
某影楼与甲约定:影楼为甲免费拍写真集,甲允许影楼使用其中一张照片作为影楼的橱窗广告。后甲发现自己的照片被用在一种性药品广告上。经查,制药公司是从该影楼花500元买到甲照片的。下列说法正确的是()。
合伙人发生与合伙企业无关的债务,相关债权人可以以其债权抵销其对合伙企业的债务。()
2012年12月1日.甲公司为了支付购货款向乙公司签发了一张金额为100万元的支票,填写票据时.由于乙公司的全称不确定,甲公司财务人员将收款人名称留白,授权甲公司的业务员王某确定好乙公司全称后再填写收款人名称。王某到乙公司处核实全称并将其准确记入支票后.将
方苞、姚鼐是清代影响最大的散文流派_______的代表。
美国哲学家()将实用主义称作“工具主义”,他非常明确地论述了实用主义的原则:“所有概念、学说、系统,不管他们怎样精致,怎样坚实,必须视为假设……它们是工具,和一切工具一样,他们的价值不在于它们本身,而在于它们所能造就的结果中呈现出来的功效。”
综合布线系统由6个子系统组成,将图3-6中(1)~(6)处空缺子系统的名称填写在对应的解答栏内。该学生宿舍楼综合布线工程建设时,信息模块的需求量考虑了3%富余量,那么该布线工程的工作区子系统至少需要采购多少个MDVO信息模块式超五类信息插座?
A、TheinfluencefromAsiancountries.B、Thegrowingcompetitionfromforeignstudents.C、Thegrowingcompetitionforentrancein
最新回复
(
0
)