首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,然后编写如下程序: Function fun (ByVal num As Long) As Long Dim k As Long k=1 num=Abs(num) Do While num k=k*(num\10) num=nm\1
在窗体上画一个命令按钮,然后编写如下程序: Function fun (ByVal num As Long) As Long Dim k As Long k=1 num=Abs(num) Do While num k=k*(num\10) num=nm\1
admin
2010-01-05
59
问题
在窗体上画一个命令按钮,然后编写如下程序:
Function fun (ByVal num As Long) As Long
Dim k As Long
k=1
num=Abs(num)
Do While num
k=k*(num\10)
num=nm\10
Loop
fun=k
End Function
Private Sub Command1_ Click()
Dim n As Long
Dim r As Long
n=InputBox("请输入一个数")
n=CLng(n)
r=fun(n)
MsgBox r
End Sub
程序运行后,单击命令按钮,在输入对话框中输入234,消息框显示的结果为【 】。
选项
答案
0
解析
程序将输入的内容234转变为长整型传入函数fun中,然后进入循环。
循环第一次结束的时候:k=23 num=23
循环第二次结束的时候:k=46 hum=2
循环第三次结束的时候:k=0 num=0
转载请注明原文地址:https://kaotiyun.com/show/6hwp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
有如下程序:#includevoidmain(){charstr[2][5]={“1234”,“5678”},*p[2];inti,j.s=0:for(i=0:i
当数据库中数据总体逻辑结构发生变化,而应用程序不受影响,称为数据的
使用VC6打开考生文件夹下的源程序文件modi3.cpp。其中定义的类并不完整,按要求完成下列操作,将类的定义补充完整。完成以下功能:(1)定义私有常量PI,请在注释//********1********后添加适当的语句。(2)完成类的
下列运算符函数中肯定不属于类FunNumber的成员函数的是()。
以下()不属于对象的基本特征。
有如下程序输入字符+时,程序的运行结果是()。
数据库设计中反映用户对数据要求的模式是( )。
if语句的语法格式可描述为:格式1:if()或格式2:if()else关于上面的语法格式,下列表述中错误的是()。
若目前E盘根目录下不存在data.txt文件,则下列打开文件方式不会自动创建data.txt文件的是
随机试题
按信令传送信道和用户消息传送信道的关系,可分为随路信令和___________信令。
某企业截至评估基准日应收账款余额为360万元,前5年应收账款余额合计为1470万元,处理坏账合计58.8万元,该企业应收账款评估值为【】
A、 B、 C、 D、 C
下列血浆脂蛋白中胆固醇含量最高、最低的分别是
下列哪项不是急性肾小球肾炎的特点
根据《建筑内部装修防火施工及验收规范》规定,木质材料表面进行防火涂料处理时,涂刷防火涂料用量不应少于()。
Thepairwords"lift"and"elevator"are
对于入园初期适应困难的孩子,幼儿园教师可以()。
下列叙述中正确的是( )。
A、Shehadaminoraccident.B、Shecaughtaseriouscold.C、Shecaredtoomuchaboutherlooking.D、Shegotstuckinthetraffic.
最新回复
(
0
)