首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下通用过程: 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
53
问题
有如下通用过程:
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/lMQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
单击命令按钮时,下列程度段的执行结果为()。PfivateSubCommand1_Click()DimaAsInteger,bAsInteger,cAsIntegera=2:b=4:c=6
下列事件过程的功能是:建立一个名为Datal的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请选择正确的程序段是(),将程序补充完整。PrivateTypeAngKAsIntege
在C盘当前文件夹下建立一个名为SDat.txt的顺序文件。要求用InputBox函数输入5名学生的学号(StuNo)、姓名(StuName)和英语成绩(StuEng)。则在下列横线处合适的语句是()。PrivateSubForm_Cli
下列程序段错误的是()。
当数据的物理结构(存储结构、存取方式等)改变时,不影响数据库的逻辑结构,从而不致引起应用程序的变化,这是指数据的【】。
关系模型的数据操纵即是建立在关系上的数据操纵,一般有【】、增加、删除和修改四种操作。
在3种不同类型的组合框中,只能选择而不能输入数据的组合框是【】。
数据字典是各类数据描述的集合,它通常包括5个部分,即数据项、数据结构、数据流【】和处理过程。
设一棵完全二叉树共有500个结点,则在该二叉树中有【】个叶子结点。
随机试题
糖皮质激素诱发和加重感染的主要:
硝普钠光化降解反应中
参与原核细胞翻译启动的物质不包括
TNF的编码基因位于
男,24岁。发热,腹痛、腹泻1天,为黏液脓血便。查体:T38.4℃,BP110/62mmHg,脐周及左下腹有轻压痛,实验室检查:血WBC15.8×109/L,N0.88,L0.12。粪镜检:WBC40/HP,RBC20/HP。肠道最可能的病理变化
箭条图是()等方法的结合。
某些智能头盔或眼镜能使佩戴者具有身临其境的沉浸感,具有与环境完善的交互作用能力,并有助于启发构思。这采用的技术是()。
不安抗辩权是双务合同中的()享有的法定权利。
Whatwillmakeonehavesevenyearsofbadluckaccordingtothespeaker?
Whatcolorofclothesthewomanisgoingtowear?
最新回复
(
0
)