首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click() Dim n As Integer n = InputBox("请输入一个数值:") Print n; ff(n) End Sub Function ff(x As
编写如下程序: Private Sub Command1_Click() Dim n As Integer n = InputBox("请输入一个数值:") Print n; ff(n) End Sub Function ff(x As
admin
2015-10-23
100
问题
编写如下程序:
Private Sub Command1_Click()
Dim n As Integer
n = InputBox("请输入一个数值:")
Print n; ff(n)
End Sub
Function ff(x As Integer)
Dim k As Integer
k = 1
Do While x
k = k * (x Mod 10)
x = x \ 10
Loop
ff = k
End Function
程序运行后,单击命令按钮Command1,并在输入对话框中输入269,输出结果为
选项
A、269 108
B、0 108
C、269 1
D、26 54
答案
B
解析
在函数ff的Do循环中,当x=269时,k=1*9,x=26;继续执行Do循环体,k=9*6,x=2;第三次执行Do循环循环体,k=54*2=108,x=0,x不满足循环条件,退出循环,函数ff返回值为108。故B项正确。
转载请注明原文地址:https://kaotiyun.com/show/0TLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在名为Form1的窗体上建立一个文本框,名为Text1;一个命令按钮,名为Cmd1,标题为“计算”,如下图所示。程序运行后,单击“计算”命令按钮,通过在对话框输入整数10,放入整型变量s中,然后计算s!(提示:运算结果应放入Long型变量中),在文本框中显
已知数组A(4,4),各个元素在运行程序时被赋值并打印,形成四除非方阵。请在【】和【】处填处所需的内容,使产生一个转置矩阵(即行列互换),仍放在数组A中,并打印出来。例如:123412341234
单击命令按钮时,下列程序的执行结果为PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=12:y=32CallPCS(x,y)Printx;yEndSub
在n个运动员中选出任意r个人参加比赛,有很多种不同的选法,选法的个数可以用公式n!计算。下图窗体中3个文本框的名称依次是Text1、Text2、Text3。程序运行时在(n-r)!r!Text1、Text2中分别输入n和r的值,单击Comman
下列叙述中,正确的是
当一个对象(如窗体或图片框)被移动或改变大小之后,或当一个覆盖该对象的窗体被移开之后,如果要保持该对象上所画图形的完整性,可以选择触发()事件来完成图形的重画工作。
数据库DB、数据库系统DBS、数据库管理系统DBMS之间的关系是()。
已知代数式eXSin(30°)2x/(x+y)Lnx,则正确的VisualBasic表达式为()。
关系表中的每一横行称为一个
在VisualBasic中,下列运算符中优先级最高的是______。
随机试题
主治肺痿的方剂不包括
A.上颌结节后壁区增生新骨B.颧骨侧面增加新骨C.鼻腔底面吸收骨质D.蝶骨间软骨结合生长E.蝶筛软骨结合生长对青少年而言,上述哪些组织生长发育的行为能直接影响上颌骨宽度的变化
毒物排泄的主要途径是
以下属于临时性水工建筑物的是()。
风险识别包括()两个环节。
紧张、焦虑、恐惧等消极情绪出现,对身心健康都是有害无益的,应该尽量压抑这类情绪。()
如下图所示,在长为64米、宽为40米的长方形耕地上修建宽度相同的两条道路(一条横向、一条纵向),把耕地分为大小不等的四块耕地。已知,修路后耕地总面积为1377平方米,则该道路路面宽度为多少米?
Whatistheaimoftheprogram?
NarratorListentopartofaconversationbetweenastudentandaprofessor.Nowgetreadytoanswerthequestions.Yo
A、TheywanttoprotestagainstBritishCouncil.B、TheywanttoputadiamondontheQueen’scrown.C、TheywanttheUKGovernment
最新回复
(
0
)