首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下的一个函数过程: Function fn(ByVal num As Long) Dim k As Long k=1:num=Abs(num) DO While num k=k*fhum Mod 10) num=hum\10 Loop fn=k End
有如下的一个函数过程: Function fn(ByVal num As Long) Dim k As Long k=1:num=Abs(num) DO While num k=k*fhum Mod 10) num=hum\10 Loop fn=k End
admin
2015-05-30
43
问题
有如下的一个函数过程:
Function fn(ByVal num As Long)
Dim k As Long
k=1:num=Abs(num)
DO While num
k=k*fhum Mod 10)
num=hum\10
Loop
fn=k
End Function
通过以下事件过程调用该函数,程序运行后,在输入对话框中输入数字“123”,则运行结果为( )。
Private Sub Command 1_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/OCQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序段的输出结果为()。A=0PrintA+1A=3
在面向对象方法中,()描述的是具有相似属性与操作的一组对象。
在数据结构中,用一组地址连续的存储单元一次存储数据元素的方式是______结构。
VisualBasic应用程序中,下列关于过程的说法正确的是()。
在窗体上画两个文本框Text1和Text2,一个命令按钮Command1,请阅读以下程序段:PrivateSubCommand1_Click()x=0DoUntilx>=50x=
通过InputBox函数可以产生输入对话框。若执行下列语句:st$=InputBox("请输入字符串","字符串对话框","字符串")则运行程序,用户输入完毕并单击“确定”按钮后,st$变量的内容为()。
获取文本框中被选取的文本内容的属性是()。
下面的程序代码实现将一个一维数组中元素向右循环移动,移位次数由文本框Text1输入。例如数组各元素的值依次为0,1,2,3,4,5,6,7,8,9,10;移动三次后,各元素的值依次为8,9,10,0,1,23,4,5,6,
下列程序段的执行结果为m=1n=1SelectCasemCase1SelectCasenCase0
结构化程序设计的3种基本结构是()。
随机试题
阴离子间隙大于16mmoL/L,表示阴离子间隙为12mmol/L
阕电位是指
木模板及其支架的设计应符合现行国家标准《木结构设计规范》的规定,其中受压立杆除满足计算需要外,其梢径不得小于()mm。
不以真实身份从事期货交易的单位或者个人,交易行为符合期货交易所交易规则的,交易结果由()承担。
根据企业破产法律制度的规定,下列选项中属于债权人会议职权的有()。
规费收入包括()。
Excel中删除单元格是将单元格从工作表上完全移去,并移动相邻的单元格来填充空格,若对已经删除的单元格进行过引用,将导致出错,显示出错信息是#ERROR。()
一切行动听指挥,是警察职业的一个特点。( )是对人民警察行动上的要求。
昭君出塞
下列函数原型声明中,错误的是()。
最新回复
(
0
)