有如下程序： Function fun(ByVal aura As Integer)As Integer Dim k As Integer k=1 num=Abs(num) Do While num k=k*(num Mod 10)：n

admin2020-04-18 60

问题有如下程序：
Function fun(ByVal aura 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/bMTp777K

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

二级VB

NCRE全国计算机二级

相关试题推荐

窗体上有一个名称为Command1的命令按钮，其单击事件过程如下：PrivateSubCommand1_Click()Fori=3To1Step-1Sum=0Forj=1Toi
下列不能作为“容器”(即可以在其中放置其他控件)的是()。
设有关键码序列(66，13，51，76，81，26，57，69，23)，要按关键码值递增的次序排序若采用快速排序法，并以第一个元素为划分的基准，那么第一趟划分后的结果为()。
某二叉树有5个度为2的结点，则该二叉树中的叶子结点数是(　　)。
以下变量名中合法的是(　　)。
要求当鼠标在图片框Picturel中移动时，立即在图片中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是()。
窗体上有1个名称为Text1的文本框，1个名称为Timer1的计时器，且已在属性窗口将Timer1的Interval属性设置为2000、Enabled属性设置为False。以下程序的功能是，单击窗体，则每隔2秒钟在Text1中显示一次当前时间。Priva
在窗体上有一个名称为Drivel的驱动器列表框，一个名称为Dir1的目录列表框，一个名称为File1的文件列表框，两个名称分别为Label1、Label2的标签(标题分别为空白和“共有文件”)。要使得驱动器列表框与目录列表框、目录列表框与文件列表框同步变化
以下选项中，不合法的VisualBasic的变量名是
下列说法中，错误的是

随机试题

回火时，()将不同材料但具有相同加热温度和加热速度的工件装入同一炉中加热。
在我国决定商业银行票据再贴现利率的机构是()
Shouldyourpricebefoundreasonableandtermsandconditionsacceptable,we’llhaveregularordersafterthistrialorder.
A．深静脉是否通畅B．大隐静脉瓣膜功能情况C．交通支瓣膜功能情况D．淋巴管穿刺造影E．动脉造影
A、任何一种疾病都可找到形态的或化学的改变B、从生物和社会结合上理解人的疾病和健康C、不仅关心病人的躯体，而且关心病人的心理D、实现了对病人的尊重E、对健康、疾病的认识是片面的生物医学模式的基本点是
有效抑制胰腺分泌的药物是
患者男性，60岁，2年前逐渐出现双下肢震颤，休息时明显，行动缓慢，行走时小步向前冲，面部表情少，该患者最可能患有的疾病是
非处方药红色专有标识图案用于()。
中医汗证的治法有()。
对会计核算软件自动产生的机内记账凭证经审核登账后，不得进行修改。()

最新回复(0)

有如下程序： Function fun(ByVal aura As Integer)As Integer Dim k As Integer k=1 num=Abs(num) Do While num k=k*(num Mod 10)：n

二级VB

NCRE全国计算机二级

窗体上有一个名称为Command1的命令按钮，其单击事件过程如下：PrivateSubCommand1_Click()Fori=3To1Step-1Sum=0Forj=1Toi

下列不能作为“容器”(即可以在其中放置其他控件)的是()。

设有关键码序列(66，13，51，76，81，26，57，69，23)，要按关键码值递增的次序排序若采用快速排序法，并以第一个元素为划分的基准，那么第一趟划分后的结果为()。

某二叉树有5个度为2的结点，则该二叉树中的叶子结点数是( )。

以下变量名中合法的是( )。

要求当鼠标在图片框Picturel中移动时，立即在图片中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是()。

窗体上有1个名称为Text1的文本框，1个名称为Timer1的计时器，且已在属性窗口将Timer1的Interval属性设置为2000、Enabled属性设置为False。以下程序的功能是，单击窗体，则每隔2秒钟在Text1中显示一次当前时间。Priva

以下选项中，不合法的VisualBasic的变量名是

下列说法中，错误的是

回火时，()将不同材料但具有相同加热温度和加热速度的工件装入同一炉中加热。

在我国决定商业银行票据再贴现利率的机构是()

Shouldyourpricebefoundreasonableandtermsandconditionsacceptable,we’llhaveregularordersafterthistrialorder.

A．深静脉是否通畅B．大隐静脉瓣膜功能情况C．交通支瓣膜功能情况D．淋巴管穿刺造影E．动脉造影

A、任何一种疾病都可找到形态的或化学的改变B、从生物和社会结合上理解人的疾病和健康C、不仅关心病人的躯体，而且关心病人的心理D、实现了对病人的尊重E、对健康、疾病的认识是片面的生物医学模式的基本点是

有效抑制胰腺分泌的药物是

患者男性，60岁，2年前逐渐出现双下肢震颤，休息时明显，行动缓慢，行走时小步向前冲，面部表情少，该患者最可能患有的疾病是

非处方药红色专有标识图案用于()。

中医汗证的治法有()。

对会计核算软件自动产生的机内记账凭证经审核登账后，不得进行修改。()

某二叉树有5个度为2的结点，则该二叉树中的叶子结点数是(　　)。

以下变量名中合法的是(　　)。