首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下程序: Function fun(ByVal num As Integer) As Integer Dim k As Integer k = 1 num = Abs(num) Do While num
有如下程序: Function fun(ByVal num As Integer) As Integer Dim k As Integer k = 1 num = Abs(num) Do While num
admin
2020-02-27
37
问题
有如下程序:
Function fun(ByVal num 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
Dim 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
解析
程序从对话框中获得n的初值并转换成数字进行计算。Do While…Loop循环对传过来的数值进行处理。Mod为取余函数。代入变量和初值进行计算可得退出循环时k=48。选B。
转载请注明原文地址:https://kaotiyun.com/show/qTTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设窗体上有一个文本框Text1和一个命令按钮Command1,并有以下事件过程:PrivateSubCommandl—Click()DimSAsString,chAsStrings=""Fork=1
下列叙述中正确的是( )。
窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如图所示);还有2个文本框,名称分别为Text1、Text2,1个名称为Command1的命令按钮,并有以下程序。PrivateSubCommand1_Click()DimstrA
某人在窗体模块中定义了如下自定义类型:TypeRecnumAsIntegernameAsStringEndType但发现程序不能运行,关于这一问题,下面叙述中正确的是
假定通过复制、粘贴操作建立了一个命令按钮数组Command1,以下说法中错误的是( )。
结构化程序设计的3种结构是()。
命令按钮、单选按钮、复选框都可以通过Picture属性在控件上显示图片,但需事先设置某一属性,该属性为
在具有2n个结点的完全叉树中,叶子结点个数为()。
已知二叉树后序遍历序列是CDABE,中序遍历序列是CADEB,它的前序遍历序列是()。
在一棵二叉树上,第5层的结点数最多是()。
随机试题
关于《大清民律草案》下列说法不正确的是()
患儿苏某,男,8岁,上前牙外伤折断l小时。局部检查 冠斜折,切角缺损,牙髓暴露,触痛明显,松(-)。
患者男,68岁,因COPD住院治疗,今晨8时开始静脉输入5%葡萄糖溶液500ml及0.9%氯化钠溶液500ml,滴速70滴/分,10时护士巡视病房,发现患者咳嗽、呼吸急促、大汗淋漓、咳粉红色泡沫痰。此时护士应首先采取的措施是()
某码头工程由码头及引桥两部分组成。码头长540m,宽35m,设计为集装箱码头和多用途件杂货码头泊位各一个;结构形式为高桩梁板式结构,桩基为φ1200预应力大管桩,现浇横梁,预制安装纵梁轨道梁、面板,现浇面层。引桥长528m,宽16m,结构形式为高桩板梁式结
本案中,李某可以对下列哪些行政处罚行为申请行政复议()。如果李某在8月2日向复议机关申请复议后又向人民法院提起诉讼,下列各种情况中符合相关法律规定的是()。
把下面的六个图形分为两类,使每一类图形都有各自的共同特征或规律,分类正确的一项是:
暗示法强调正确的暗示,主要采用的手段是()。
下列情形不应当按照抢劫罪加重构成定罪处罚的有()。
将数据库的结构划分成多个层次,是为了提高数据库的逻辑独立性和
Franklin’s______recordstheauthor’srisingfrompovertyorhumblebeginningstosuccessanditisanearlyexampleoftheAmeri
最新回复
(
0
)