有如下程序： Function fun(ByVal hum As Integer)As Integer Dim k As Integer k=1 num=Abs(num) Do While num

admin2020-01-02 54

问题有如下程序：
Function fun(ByVal hum As Integer)As Integer
Dim k As Integer k=1
num=Abs(num)
Do While num
      k=k*(num Mod 10)：num=num＼10
Loop
fun=k
End Function
Private Sub Form Click()
      Dim n As Integer，r As Integer
      n=InputBox(”请输入一个数：”)：n=Int(n)：r=fun(n)：Print r
End Sub
程序运行后，单击窗体，在输入对话框中输入246，输出结果为

选项 A、120
B、48
C、24
D、60

答案B

解析在函数fun中会对传过来的参数num进行判断，如果不为0则进行循环，将各位数字乘到一起然后作为函数的返回值。

转载请注明原文地址:https://kaotiyun.com/show/KhTp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

在利用菜单编辑器设计菜单时，为了把组合键＜Alt＋O＞设置为“打开(O)”菜单项的访问键，可以将该菜单项的标题设置为()。
有如下程序：PrivateSubForm_Click()DimiAsInteger，sumAsIntegersum＝0Fori＝2To10IfiMod2＜＞0AndiMod3
表达式Abs(－5)＋Len("ABCDE")的值是()。
当窗体大小改变时，要使其中的控件也按比例发生变化，应使用窗体的()。
下面函数的功能应该是：删除字符串str中所有与变量ch相同的字符，并返回删除后的结果。例如：若str＝“ABCDABCD”，ch＝“B”，则函数的返回值为：“ACDACD”Functiondelchar(strAsString，chAs
下列表达式的值为2123的是()。
定义部门关系模式如下：部门(部门号，部门名，部门成员，部门总经理)，使它不满足第一范式的属性是()。
在进行逻辑设计时，将E—R图中实体之间联系转换为关系数据库的()。
以下叙述中，错误的是()。
算法的有穷性是指(　　)。

随机试题

Cushing病是指下列哪种病因引起的皮质醇增多症
当冲突规范所援引的外国法的内容依照法律规定的方法仍不能查明时，我国法院通常的做法是什么?()
以下关于燃油燃烧说法错误的是()。
一级评价项目大气环境影响预测内容包括()。
一般认为，多媒体技术研究的兴起从()开始。
简述儿童戏剧文学的特点。
下列文件扩展名不属于图片文件的是()
“一丝不苟”中的“丝”的含义是()。
(2012年915联考一41)某单位购买一批树苗计划在一段路两旁植树。若每隔5米种1棵树，可以覆盖整个路段，但这批树苗剩20棵。若每隔4米种1棵树且路尾最后两棵树之间的距离为3米，则这批树苗刚好可覆盖整个路段。这段路长为()。
在VisualFoxPro中，下面描述正确的是

最新回复(0)

有如下程序： Function fun(ByVal hum As Integer)As Integer Dim k As Integer k=1 num=Abs(num) Do While num

二级VB

NCRE全国计算机二级

在利用菜单编辑器设计菜单时，为了把组合键＜Alt＋O＞设置为“打开(O)”菜单项的访问键，可以将该菜单项的标题设置为()。

有如下程序：PrivateSubForm_Click()DimiAsInteger，sumAsIntegersum＝0Fori＝2To10IfiMod2＜＞0AndiMod3

表达式Abs(－5)＋Len("ABCDE")的值是()。

当窗体大小改变时，要使其中的控件也按比例发生变化，应使用窗体的()。

下面函数的功能应该是：删除字符串str中所有与变量ch相同的字符，并返回删除后的结果。例如：若str＝“ABCDABCD”，ch＝“B”，则函数的返回值为：“ACDACD”Functiondelchar(strAsString，chAs

下列表达式的值为2123的是()。

定义部门关系模式如下：部门(部门号，部门名，部门成员，部门总经理)，使它不满足第一范式的属性是()。

在进行逻辑设计时，将E—R图中实体之间联系转换为关系数据库的()。

以下叙述中，错误的是()。

算法的有穷性是指( )。

Cushing病是指下列哪种病因引起的皮质醇增多症

当冲突规范所援引的外国法的内容依照法律规定的方法仍不能查明时，我国法院通常的做法是什么?()

以下关于燃油燃烧说法错误的是()。

一级评价项目大气环境影响预测内容包括()。

一般认为，多媒体技术研究的兴起从()开始。

简述儿童戏剧文学的特点。

下列文件扩展名不属于图片文件的是()

“一丝不苟”中的“丝”的含义是()。

(2012年915联考一41)某单位购买一批树苗计划在一段路两旁植树。若每隔5米种1棵树，可以覆盖整个路段，但这批树苗剩20棵。若每隔4米种1棵树且路尾最后两棵树之间的距离为3米，则这批树苗刚好可覆盖整个路段。这段路长为()。

在VisualFoxPro中，下面描述正确的是

算法的有穷性是指(　　)。