首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Commandl的命令按钮,其单击事件过程如下: Private Sub Command1_Click() Dim sAs Double s=0:i=1 Do While i
窗体上有一个名称为Commandl的命令按钮,其单击事件过程如下: Private Sub Command1_Click() Dim sAs Double s=0:i=1 Do While i
admin
2019-07-30
95
问题
窗体上有一个名称为Commandl的命令按钮,其单击事件过程如下:
Private Sub Command1_Click()
Dim sAs Double
s=0:i=1
Do While i<6
s=s+i/(i+1):i=i+1
Loop Print s
End Sub
该事件过程的功能是计算一个表达式的值,该表达式是
选项
A、1+1/2+2/3+3/4+4/5
B、1+1/2+2/3+3/4+4/5+5/6
C、1/2+2/3+3/4+4/5
D、1/2+2/3+3/4+4/5+5/6
答案
D
解析
本题中Do循环的循环变量i的初值为1,继续循环的条件是i<6,在每次循环中i的值加1,因此循环会执行5次;在第一次循环中累加1,2,第二次循环中累加2/3,第三次循环中累加3/4……即最后计算的是1/2+2/3+3/4+4/5+5/6的值.
转载请注明原文地址:https://kaotiyun.com/show/EeUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
假定建立了一个名为Command1的命令按钮数组,则以下说法中错误的是
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下:PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerStaticzAsInteger
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。要求编写一个程序,统计文本框中0-9各数字字符的个数。某人编写如下程序:PrivateSubCommand1_Click()Dimcount(10)As
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimiAsInteger,nAsIntegerFori
设窗体上有一个文本框Text1和一个命令按钮Command1,并有以下事件过程:PrivateSubCommand1_Click()DimsAsString,chAsStrings=""Fork=1ToLen(Text1)ch=Mid
VisualBasic中的“启动对象”是指启动VisualBasic应用程序时,被自动加载并首先执行的对象。下列关于VisualBasic“启动对象”的描述中,错误的是
为了使标签控件在显示其内容时不覆盖其背景内容,需进行设置的属性为
假定一个工程由一个窗体文件Form1和两个标准模块文件Model1和Model2组成Model1的代码如下:PublicxAsInteger:PublicyAsIntegerSubS1()
为使文本框具有初始值“VB”,在设计阶段正确的操作是
对长度为n的线性表进行顺序查找,在最坏情况下所需要的比较次数为
随机试题
中外文化第二次交汇的特点是()
某试点城市的国有企业于2014年2月1日被债权人申请破产,2014年4月1日人民法院依法宣告其破产,4月10日成立清算组,企业破产时管理的财产和债权人申报的债权情况如下:(1)企业破产时经营管理的财产评估变现价值如下:①第1号房屋价值3
审查施工组织设计的基本要求有( )。
根据刑事法律制度的规定,下列有关徇私舞弊不征、少征税款罪的表述,正确的是()。(2011年)
2019年2月,某市税务机关拟对辖区内某房地产开发公司开发的房产项目进行土地增值税清算。该房地产开发公司提供房产开发项目的资料如下:(1)2016年8月支付政府8000万元土地出让金(取得合规的财政票据),取得用于该房地产开发项目的土地,并缴纳契税。(
同样的产品贴上不同的品牌标识,会产生悬殊的价格,体现了品牌的()。
党取得新民主主义革命胜利的三大法宝是:
下列属于居民财产性收入的是()。
目前个人网上募捐的行为越来越盛行,但却屡现骗局。请你谈谈如何有效加强网络监管,发挥网络募捐的作用。
WelcometoVirginiaPleasecometofeelthewarmthofaVirginiawelcomefromtheBlueRidgeMountainstotherollingAtlant
最新回复
(
0
)