首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下的一个函数过程: Function fn(ByVal num As Long) Dim k As Long k=1:num=Abs(num) Do While num k=k*(num Mod 10)
有如下的一个函数过程: Function fn(ByVal num As Long) Dim k As Long k=1:num=Abs(num) Do While num k=k*(num Mod 10)
admin
2017-04-26
45
问题
有如下的一个函数过程:
Function fn(ByVal num As Long)
Dim k As Long
k=1:num=Abs(num)
Do While num
k=k*(num Mod 10)
num=num\10
Loop
fn=k
End Function
通过以下事件过程调用该函数,程序运行后,在输入对话框中输入数字“123”,则运行结果为( )。
Private Sub Command1_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表明参数为传值调用。函数m的主要功能为取出num的每一位,进行累计相乘,然后返结果。
转载请注明原文地址:https://kaotiyun.com/show/OUGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()x=0n=InputBox("")Fori=1Ton
下列关于多重窗体程序的叙述中,错误的是()。
下列叙述中正确的悬______。
有如下函数过程。FunctionFun(ByValxAsInteger,ByValyAsInteger)AsIntegerDoWhiley<>0rem
设有关键码序列(66,13,5l,76,81,26,57,69,23),要按关键码值递增的次序排序,若采用快速排序法,并以第一个元素为划分的基准,那么第一趟划分后的结果为()。
属性窗口分为4个部分,这4个部分分别是______。
假定窗体上有一个文本框,名为Txt1,为了使文本框的内容能够操作,并且具有水平和垂直滚动条,正确的属性设置为()
一个项目具有一个项目主管,一个项目主管可管理多个项目,则实体“项目主管”与实体“项目”的联系属于【】的联系。
线性表进行二分法检索,其前提条件是()。
For-Next循环的初值、终值与步长()。
随机试题
有人认为只有写到书本上的理论才是真实可靠的,从而不顾实际情况,死搬书本上的教条。这在认识论上犯了类似于()
I’dliketodiscusswithyouthesecretsofgoodconversation.Whensomeonetellsyouthatyouhavetogiveaspeech,your【B1】__
A.内囊病变B.肌肉病变C.一侧脑干病变D.脊髓横贯性损伤E.脑膜病变表现为双下肢瘫痪的病变部位为
患儿,6个月。肺炎,精神不振,食欲差,对该患儿饮食指导错误的是
以下各项,说法不正确的是()。
经济学主要研究()。
下列哪组成语来源于史实?()
Sincethepre-historictimes,manhashadanurgetosatisfyhisneeds.Beithunger,shelterorsearchforamate,hehasalway
8段共阴极LED数码管如右图所示,为使其显示数字5,其段代码(高位到低位的顺序是:dpgfedcba)为()。
FrictionbetweenAmerica’smilitaryanditscivilianoverseersisnothingnew.America’s220-yearexperimentinciviliancontrol
最新回复
(
0
)