首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上有一个命令按钮Command1和一个文本框Text1,编写事件代码如下 Private Sub Command1_Click() Dim i,j,x For i=1 To 20 sep 2 x=0 Forj=i To 20 step 3 x=x+1
在窗体上有一个命令按钮Command1和一个文本框Text1,编写事件代码如下 Private Sub Command1_Click() Dim i,j,x For i=1 To 20 sep 2 x=0 Forj=i To 20 step 3 x=x+1
admin
2019-06-28
28
问题
在窗体上有一个命令按钮Command1和一个文本框Text1,编写事件代码如下
Private Sub Command1_Click()
Dim i,j,x
For i=1 To 20 sep 2
x=0
Forj=i To 20 step 3
x=x+1
Next j
Next i
Text1.Value=Str(x)
End Sub
打开窗体运行后,单击命令按钮,文本框中显示的结果是
选项
A、1
B、7
C、17
D、400
答案
A
解析
外循环每次循环都将x重置为0,所以只看外循环的最后一次即i=20时,此时内循环j=i=20开始以步长为2开始递增,递增一次执行x=x+1=0+1=1后便结束循环,所以最后文本框显示的结果为1。
转载请注明原文地址:https://jikaoti.com/ti/oDo0FFFM
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
在考生文件夹下,“sampl.accdb”数据库文件中已建立好表对象“tStud”和“tScore”、宏对象“mTest”和窗体“fTest”。试按以下要求,完成各种操作:冻结表“tStud”中的“姓名”字段列。
考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tAddr”和“tUser”,同时还设计出窗体对象“fEdit”和“fEuser”。请在此基础上按照以下要求补充“fEdit”窗体的设计:在窗体中还有“修改”和“保存”两个
考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tAddr”和“tUser”,同时还设计出窗体对象“fEdit”和“fEuser”。请在此基础上按照以下要求补充“fEdit”窗体的设计:将窗体中“退出”命令按钮(名称为“
考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计了表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。试在此基础上按照以下要求补充设计:设置报表“rEmp”按照“性别”字段降序(先女后男)排列输出;
考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好“tStud”、“tCourse”和“tScore”三个关联表对象。此外,还提供窗体“Nest”和宏“mTest”,试按以下要求完成设计:设置窗体“tTest”上“test2”按钮
若要查询某字段的值为“JSJ”的记录,在查询设计视图对应字段的准则中,错误的表达式是()。
下面过程输出记录集的记录个数。SubGetRecNum()DimrsAsObjectSetrs=Me.RecordsetMsgBox【】EndSub程序空包处【】应该填写的是
软件按功能可以分为:应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是( )。
下列关于查询设计视图"设计网格"各行作用的叙述中,错误的是( )。
某二叉树共有12个结点,其中叶子结点只有1个。则该二叉树的深度为(根结点在第1层)
随机试题
PlantingPotatoesWhenIwasaboywehadseveralgardensaroundouroldhouse.Thelargestoneofallwasusedjustforgrow
不属于胃黏膜下病变的是
神经纤维瘤病肝豆状变性
糖酵解途径中最重要的调节酶是
设计准备工作可归纳为( )。
立井井筒施工中,出现较大涌水量时,宜设置()进行排水。
绝缘型防腐蚀涂料主要适用于原油储罐1.5m以下的内壁板和内底板部位,其技术指标主要有()。
现代生物技术的核心是(),它的出现带动了生物技术的全面发展。
打开考生文件夹下的演示文稿yswg.pptx,按照下列要求完成对此文稿的修饰并保存。在第一张幻灯片前插入版式为“两栏内容”的新幻灯片,一标题为“北京市出租车每月每车支出情况”,将考生文件夹下的图片文件pptl.jpg插入到第一张幻灯片右侧内容区,将第二
ThenationalflowerofEnglandis
最新回复
(
0
)