首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面程序运行时,单击窗体后,窗体上显示的结果是( )。 Private Sub Form_Click() Dim i As Integer Dim sum As Long Dim t As Long t
下面程序运行时,单击窗体后,窗体上显示的结果是( )。 Private Sub Form_Click() Dim i As Integer Dim sum As Long Dim t As Long t
admin
2012-09-07
21
问题
下面程序运行时,单击窗体后,窗体上显示的结果是( )。
Private Sub Form_Click()
Dim i As Integer
Dim sum As Long
Dim t As Long
t=1:sum=0
For i=1 To 3
t=t*i
sum=sum+t
Next i
Print sum
End Sub
选项
A、3
B、9
C、5
D、6
答案
B
解析
本题考查累加算法。题目中sum为求和项,初值为0,t为每一项的值,变化规律为后一项是前一项的i倍,i的变化为从1到3,由于t的初值为1,因此求和为1*1+1*2+2*3。
转载请注明原文地址:https://kaotiyun.com/show/TDhp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮,然后写出如下事件过程: PrivateSubCommand1_Click() S=1 Do S=(S+1)^(S+2) Number=Number+1 Loop
下列程序的功能是:将数据1,2,…,10写入顺序文件Base.txt中,请填空。 PrivateSubForm_Click() DimiAsInteger Open【】As#1 Fori=1To10 【
下列叙述中,错误的是
窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Labell)。要求程序运行后,如果在文本框中输入字符,则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是:_______。
下列说明中,不属于随机文件特点的是
在窗体上有若干控件,其中有一个名称为Text1文本框。影响Text1的Tab顺序的属性是______。
设在工程中有一个标准模块,其中定义了如下记录类型TypeBooksNameAsString*10TelNumAsString*20EndType在窗体上画一个名为Command1的命令
假设A="GoodMorning.",B="Afternoon,Boys.",则下列表达式的结果等于"GoodBoys."的是()。
对于任何一棵二叉树,若度为1的结点数为n1,度为2的结点数为n2,则叶子数n0为【】。
在E-R图中,用来表示实体之间联系的图形是______。
随机试题
程序正当是行政法的基本原则。下列选项中是程序正当要求的体现的是()。
男性,34岁,农民。频繁腹泻及呕吐1天来诊。约20余次,水样便,伴腓肠肌抽痛;无明显腹痛。体检:神志清,明显脱水征,BP8/5.3kPa(60/40mmHg),血浆比重1.035,红细胞压积0.60(60%),WBC18×109/L,大便光镜检WB
有关药品的作用和合理应用,不正确的是
低温冷藏食品主要卫生问题是()
【背景资料】某泵站加固改造工程施工内容包括:引渠块石护坡拆除重建、泵室混凝土加固、设备更换、管理设施改造等。招标文件按照《水利水电工程标准施工招标文件》编制。某公司参加了投标。为编制投标文件,公司做了以下准备工作。工作一:搜集整理投标报价所需的主要材料
中国沈阳国际贸易集团公司与中国台湾越秀公司以FOB高雄USD50元/台的价格签订了进10000台简易型节气门传感器(属自动进口许可管理、法定商检商品)的合同。该批货物于2007年5月10日由“青莲号”货轮载运进境。该公司于当日向海关申报货物进口,海关验
古代马国是一个奴隶制国家,有国王、有将军、有军队,使用奴隶劳动,并用奴隶作祭祀祖的供品。()灭马国后,采取了一系列封建化的改革措施,使其沿封建制的方向前进。
居住在宁国市的畲族,有不同于汉族的婚嫁习俗。畲族婚俗方式有()。
Inthefollowingconversation,BviolatestheMaximof________.A:Mrs.Xisanoldbag.B:Theweatherhasbeenquitedelightfu
Muchunfriendlyfeelingtowardscomputershasbeenbasedonthefearofwidespreadunemploymentresultingfromtheirintroductio
最新回复
(
0
)