首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面程序运行时,单击窗体后,窗体上显示的结果是( )。 Private Sub Form_Click() Dim i As Intege,sum As Long Dimt As Long t=1:sum=0 For i=1To3 t=t*i sum=
下面程序运行时,单击窗体后,窗体上显示的结果是( )。 Private Sub Form_Click() Dim i As Intege,sum As Long Dimt As Long t=1:sum=0 For i=1To3 t=t*i sum=
admin
2017-03-26
88
问题
下面程序运行时,单击窗体后,窗体上显示的结果是( )。
Private Sub Form_Click()
Dim i As Intege,sum As Long
Dimt As Long
t=1:sum=0
For i=1To3
t=t*i
sum=sum+t
Nexti
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/fmGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下各组序列中,属于堆的是
软件的详细设计也称为模块设计,它要求设计人员为每一个程序模块确定:所使用的【】、数据结构、接口细节和输入/输出数据等。
在窗体上面一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimaAsInteger,sAsIntegera=8s=1D
对建立良好的程序设计风格,下面描述正确的是______。
如果在程序中要将c定义为静态变量,且为整型数,则应使用的语句是
窗体上命令按钮Commandl的事件过程如下:PrivateSubCommand1_Click()DimtotalAsIntegertotal=s(1)+s(2)PrinttotalEndSubPrivateFunctions
下列程序运行后,在窗体上打印的结果是【】。PrivateSubtest(a,b,c)a=a+1:b=b+2:C=C+3EndSubPrivateSubCommand1
下列事件过程的功能是:建立一个名为Data1的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度:1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整。PrivateTyPeAngKAsIntegerSinxAsSin
文本框TextBox中的内容若要设置为用户不能修改,应设置()属性。
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Dima(1To10)Dimp(1To3)k=5Fori=1To10a(i)=iNextiFori=1To3p
随机试题
我们把逻辑上具有完整意义的信息集合称为______。
Useyour______,andyou’resuretoachievesomething.
(2011年考试真题)我国基金资产估值的责任人是()。
北京红桥运输公司2014年7月发生如下经济业务:(1)从某汽车贸易公司购进2辆出厂日期为2011年2月的国产车辆作为固定资产自用,2011年2月的不含税市场价为8万元/辆;现在的新车市场价为不含税6.8万元/辆,红桥运输公司按每辆不含税5万元和贸易公司结
甲公司系增值税一般纳税人,2×14年至2×17年与固定资产业务相关的资料如下:资料一:2×14年12月25日,甲公司以银行存款购入一套不需安装的大型生产设备,取得的增值税专用发票上注明的价款为5000万元,增值税税额为850万元。资料二:2×14年12
【情境】瑞翔网络(集团)发展有限公司是国内知名的互动娱乐传媒公司。该集团公司成立于1999年11月,致力于通过互联网为用户提供多元化的娱乐服务和在线服务。主营业务是网络互动游戏,由集团公司的主体企业瑞翔柚子负责运营。集团公司的运营能力、客户服务能
使用超声雾化吸入方法给药时,应注意()。
Elephantswould______ifmenwereallowedtoshootasmanyastheywished.
简述知觉的特性。
Readthearticlebelowaboutenhancede-books’influenceonliterature,andthequestionsontheoppositepage.Foreachque
最新回复
(
0
)