首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面程序运行时,单击窗体后,窗体上显示的结果是 ( )。 Private Sub Form_Click() Dim i As Integer Dim sum As Long Dim t As Long t=1:
下面程序运行时,单击窗体后,窗体上显示的结果是 ( )。 Private Sub Form_Click() Dim i As Integer Dim sum As Long Dim t As Long t=1:
admin
2020-07-22
75
问题
下面程序运行时,单击窗体后,窗体上显示的结果是 ( )。
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://www.kaotiyun.com/show/G5Hp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个文本框,名称为Text1,然后编写如下程序:PrivateSubForm_Load() Show Text1.Text="" Text1.SetFocusEndSubPrivateSubForm_Click()
在窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗伪外观如图所示。设有如下的类型和变量声明:PrivateTypePersonnameAsString*8maj
下列关于类、对象、属性和方法的叙述中,错误的是()。
(1)在考生文件夹下有一个工程文件sjt3.vbp,包含2个窗体,名称分别为Forml、Form2。窗体上已有部分控件,请在Forml窗体上再添加1个名称为Textl的文本框,Text属性为空,Enable属性设置为False(如图所示),输入字符时文本框
窗体上有一个名称为Command1的命令按钮,事件过程如下:PrivateSubCommand1_Click() Dimarr_x(5,5)AsInteger Fori=1To3 Forj=2To4 ar
设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Module1.bas。两个窗体上分别只有一个名称为Command1的命令按钮。Form1的代码如下:PublicxAsIntegerPrivateSubFo
窗体上有一个名称为Text1的文本框;一个名称为Timer1的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timer1的事件过程如下:PrivateSubTimer1_Timer() StaticflagA
表达式Str(Len("123"))+Str(77.7)的值是()。
下列叙述中,不属于软件需求规格说明书的作用的是()。
设有如下声明语句OptionBase1Dimarr(2,-1To5)AsInteger则数组arr中数组元素的个数是
随机试题
产品销售过程中支付的运杂费应计入()。
齿龈内阿米巴福氏耐格里阿米巴
诊断原发性不孕的依据为
下列风险管理领域相关制度指引中,()不属于信用风险管理领域相关制度指引。
下列相关表述中,正确的有()。
人体在剧烈运动时血液pH值的变化特点是()。
下列关于总线仲裁方式的说法中,正确的有()。Ⅰ.独立请求方式响应时间最快,是以增加控制线数为代价的Ⅱ.计数器定时查询方式下,有一根总线请求(BR)和一根设备地址线,若每次计数都从0开始,则设备号小的优先级高Ⅲ.链式查询
甲、乙、丙、丁四公司之间形成了三角债。甲建材公司拖欠丙钢铁公司货款170万元。乙建筑丁程公司欠甲建材公司材料款:180万元。乙建筑工程公司在给丁科研所建好一幢大楼后,因资金尚未到位,丁科研所尚欠乙建筑工程公司工程款:180万元。为了尽早了结债务,2008年
Artificialflowersareusedforscientificaswellasfordecorativepurpose.Theyaremadefromavarietyofmaterials,suchas
(1)Earlyinthefilm"ABeautifulMind",themathematicianJohnNashisseensittinginaPrincetoncourtyard,hunchedoverap
最新回复
(
0
)