首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读下面的程序代码: Private Sub Command1_Click() Print fun(748639,5) End Sub Private Function fun(x As Long,a As Integer)
阅读下面的程序代码: Private Sub Command1_Click() Print fun(748639,5) End Sub Private Function fun(x As Long,a As Integer)
admin
2018-07-11
52
问题
阅读下面的程序代码:
Private Sub Command1_Click()
Print fun(748639,5)
End Sub
Private Function fun(x As Long,a As Integer)As Integer
Dim n As Long
n=1
Do
n=n*10
a=a-1
Loop Until a=0
fun=Int((x Mod n)/(n/10))
End Function
此程序代码运行后的输出是( )。
选项
A、3
B、4
C、48639
D、74863
答案
B
解析
主调过程Command1_Click中调用函数过程fun,并将整数748639传递给形参x,将5传递给形参a,被调过程fun中循环执行情况及各变量的值如下表所示。
x mod n=748639 mod 100000=48639:n/10=100000/10=10000:故表达式Int((x Mod n)/(n/10))结果为Int(48639/10000)=4;所以B选项正确。
转载请注明原文地址:https://kaotiyun.com/show/BoFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Optionl的单选按钮数组,程序运行时,当单击某个单选按钮时,会调用下面的事件过程PrivateSubOption1_C1ick(IndexAsInteger)EndSub下面关于此过程的参数Index的叙述中正
语句DimArr(-2To4)AsInteger所定义的数组的元素个数为
关于水平滚动条,如下叙述中错误的是
下列不能打开工具箱窗口的操作是()。
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是通过键盘向文本框中输人大、小写字母和数字。单击标题为“统计”的命令按钮,分别统计输入字符串中大写字母、小写字母及数字字符的个数,并将统计结果分别在标签控件数组x中显示,如图所示。在给
窗体上有一个列表框控件List1。以下叙述中错误的是( )。
(1)在标题为“列表框”、名称为Form1的窗体上添加一个名称为List1的列表框,通过属性窗口输入4个列表项:“数学”、“语文”、“历史”、“地理”,列表项形式采用复选框形式,如图所示。列表框的宽为1100,高不限。注意:存盘时必须存放在考生文
数据库中对概念模式内容进行说明的语言是
在关系数据库中,用来表示实体间联系的是
算法的空间复杂度是指( )。
随机试题
商业银行在识别和分析集团法人客户信用风险的过程中,应当()。
下列事件最合理的发生顺序为:(1)巴蜀中人(2)感冒咳嗽(3)喜好麻辣(4)寒潮来袭(5)忌辛忌辣
建设社会主义核心价值体系是构建和谐社会、建设和谐文化的必然要求,是党在哪方面的一次重大理论创新?()
山水田园诗:这类诗以描写自然风光、农村景物以及安逸恬淡的隐居生活见长。诗境隽永优美,风格恬静淡雅,语言清丽洗练,多用白描手法。根据上述定义,以下各项属于山水田园诗的是()。
无论贫民还是达官,身后能与清风明月相伴,听任潮涨潮落,不论春夏秋冬,这是最好不过的事。遗憾的是,历朝历代总有_______之徒,干掘墓鞭尸之事;总有_______之辈,干挖坟盗宝营生。填入横线处最恰当的一项是()。
把下面的六个图形分为两类,使每一类图形都有各自的共同特征或规律,分类正确的一项是:
2022年6月16日出版的第12期《求是》杂志发表习近平的重要文章《坚定不移走中国人权发展道路,更好推动我国人权事业发展》。文章强调,党的百年奋斗史,贯穿着党团结带领人民为()而进行的不懈努力。
向量β=(1,—2,4)T在基α1=(1,2,4)T,α2=(1,—1,1)T,α3=(1,3,9)T下的坐标是_______。
ElegyWritteninaCountryChurchyardisapoemwrittenby______.
A、Thebenefitsofstrongbusinesscompetition.B、Aproposaltolowerthecostofproduction.C、Complaintsabouttheexpenseofm
最新回复
(
0
)