首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程: Private Sub Command1_Click() s=0 For i=1 To 15 x=2*i-1
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程: Private Sub Command1_Click() s=0 For i=1 To 15 x=2*i-1
admin
2013-04-11
51
问题
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程: Private Sub Command1_Click() s=0 For i=1 To 15 x=2*i-1 if x Mod 3=0 Then s=s+1 Next i LabeCaption=s End Sub 程序运行后,单击命令按钮,则标签中显示的内容是______。
选项
A、1
B、5
C、27
D、45
答案
2
解析
循环共执行了15次,分别计算出x的值,为1~30之间的奇数,即1、3、5、7、……、29,并统计其中能够被3整数的个数。选项B正确。
转载请注明原文地址:https://kaotiyun.com/show/SOhp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
随机文件以【】为单位读写,随机文件的记录是【】记录。
对于建立良好的程序设计风格,下面描述正确的是______。
有一排好序的线性表,长度大于2,对给定的k值,分别用顺序查找和二分查找查找一个与k值相等的元素,比较的次数分别为x和y。在查找不成功的情况下,正确的x和y的关系是______。
已知学生关系是;学生(学号,姓名,性别,专业号,班长),其中“学号”是主码,“班长”属性表示该学生所在班级的班长的学号,则学生关系是______。
下列事件过程的功能是:建立一个名为Datal的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整。PrivateTypeAngKAsInteeer
在一个容量为25的循环队列中,若头指针front=16,尾指针rear=9,则该循环队列中共有【】个元素。
假设有文件列表框File1、驱动器列表框Drive1和目录列表框Dir1,为了使三者同步,在下列语句中,正确的语句是______。Ⅰ.File1.Path=Dir1.PathⅡ.File1.FileName=Dirl.FileName
在用Open语句打开文件时,如果省略“For方式”则打开的文件的存在方式是【】。
下列各种形式的循环中,输出“*”的个数最少的循环是
在过程定义中出现的变量名叫做【】参数,而在调用过程时传送给过程的常数、变量、表达式或数组叫做【】参数。
随机试题
InancientGreeceathleticfestivalswereveryimportantandhadstrongreligiousassociations.TheOlympianathleticfestivalh
A.多发性骨髓瘤B.食管癌C.黑色素瘤D.胃癌对放射治疗高度敏感的肿瘤是
A.肾动脉狭窄B.嗜铬细胞瘤C.原发性醛固酮增多症D.库欣综合征下列各病例最可能的诊断为男性,30岁。表现为血压重度升高,头晕,头痛,上腹部可闻及血管杂音
房地产开发企业委托房地产经纪机构代理销售商品房的委托合同应载明()。
甲公司计划投资建设一条生产线,项目总投资600万元,建设期为3年,每年年初投入200万元,项目建成后预计可使用10年,每年产生经营现金净流量150万元,若甲公司要求的投资报酬率为8%,则该项目的净现值是()万元。[已知(P/A,8%,13)=7.
2009年1月27日至2月3日,国务院总理温家宝对瑞士、德国、西班牙、英国和欧盟总部进行了正式访问,这次访问被称为()。
创新文化是与创新相关的能激励创新的文化,包括与创新有关的价值观、态度、信念等人文精神的创新观念文化和有助于创新的制度、规范等人文环境的创新制度文化。创新文化既作为环境因素,影响或制约创新过程,又作为一种渗透到创新主体的潜在因素,影响创新者的思想和行为。一个
新中国成立60多年来,我国经济区域结构实现了从低水平不协调到各具优势、协调发展转变,下列说法错误的是()。
邓小平对实事求是思想路线的主要贡献是
A.assistingB.estimatesC.shutoffD.manufacturersE.orallyF.invisibleG.sightlessH.sellersI.familiesJ.ascerta
最新回复
(
0
)