首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下通用过程: Function Fs(ByVal n As Long) As Long Dim k As Long k = 1 n = Abs(n) Do While n k = k * (n Mod 1
有如下通用过程: Function Fs(ByVal n As Long) As Long Dim k As Long k = 1 n = Abs(n) Do While n k = k * (n Mod 1
admin
2015-06-30
37
问题
有如下通用过程:
Function Fs(ByVal n As Long) As Long
Dim k As Long
k = 1
n = Abs(n)
Do While n
k = k * (n Mod 10)
n = n \ 10
Loop
Fs = k
End Function
编写如下事件过程:
Private Sub Form_Click()
Dim a As Long
Dim b As Long
a = InputBox("请输入一个数")
a = CLng(A)
b = Fs(A)
Print b
End Sub
程序运行后,单击窗体,在输入对话框中输入567,输出结果为
选项
A、56
B、67
C、210
D、18
答案
C
解析
A的值为256,调用Fs函数,执行3次循环:第1次,k=7,n = 56 ;第2次,k=7*6 = 42,n = 5 ;第3次,k= 42*5 = 210,n = 0;不满足循环条件,退出循环。故正确答案为选项C。
转载请注明原文地址:https://kaotiyun.com/show/RtQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如果在c盘当前文件夹下已存在名称为studata.dat的顺序文件,那么执行语句Open"c:\studata.dat"ForAppendAs#1之后,将
以下各项中,VisualBasic不能接收的图形文件是
要获得文件列表框中当前被选中的文件的文件名,则应使用哪个属性______。
在窗体上画两个组合框,其名称分别为Combo1、Combo2,然后画两个标签,名称分别为Label1、Label2。要求程序运行后,如果在某个组合框中选择一个项目,则把所选中的项目在其下面的标签中显示出来。请填空使程序完整。PrivateSub
Function过程与Sub过程的最主要区别是()。
下列关于图片框控件的语句中不正确的是()。
下列选项中,不是一个算法的基本特征的是()。
一个类可以从直接或间接的祖先中继承所有属性和方法。采用这个方法提高了软件的【】。
以下关系表达式中,其值为假的是______。
实体是信息世界中广泛使用的一个术语,它用于表示()
随机试题
碾压土石坝坝面作业保证压实质量的关键要求是().
侵权责任制度+民事诉讼陈文、韩耀、顾飞三人合伙开办了饭香快餐连锁店,3人共同执行合伙事务,陈文负责对外开拓市场业务,韩耀和顾飞负责店内经营。陈文为了提高市场占有率,排挤竞争对手,在未告知韩耀、顾飞的情况下散布谣言,称竞争对手闻就香快餐公司(以下简称“闻就香
消费税的计税依据是()
一般保证
某孕妇,孕32周,妊娠前曾患萎缩性胃炎,积极治疗后症状消除,近期常感乏力、头晕、心悸,皮肤黏膜苍白,怀疑贫血,最可靠的诊断为
以疏风清热、宣肺止咳为功用的方剂是
劳动合同中必须载明有关防止职业危害的事项,职业危害是指从业人员在劳动过程中因为()和遇到各种不安全因素而有损于身体健康的危害。
根据《评标委员会和评标方法暂行规定》,若评标委员会成员拒绝在评标报告上签字且不陈述其不同意见和理由的,则()。
Thesechannelsoriginattopographichighpoints;thevalleyswiden"downstream",someevendisplayinginnervalleys.
()在业人口()人口密度()城市人口()人口质量
最新回复
(
0
)