首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上有一个命令按钮Commandl和一个文本框Textl,编写事件代码如下: Private Sub Command1_Click() Dim i,j,x For i = l To 20 step 2 x = 0 For j =
在窗体上有一个命令按钮Commandl和一个文本框Textl,编写事件代码如下: Private Sub Command1_Click() Dim i,j,x For i = l To 20 step 2 x = 0 For j =
admin
2020-10-14
61
问题
在窗体上有一个命令按钮Commandl和一个文本框Textl,编写事件代码如下:
Private Sub Command1_Click()
Dim i,j,x
For i = l To 20 step 2
x = 0
For j = 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
解析
题目中使用了双重For循环,外循环中每循环一次,X的值都是从0开始,所以外循环中到最后一次循时,X的值是0,而内循环中的最后一次循环是j=20 to 20 step 3所以此时内循环只循环一次,X的值为X=0+1=1。Str函数将数值转换成字符串。
转载请注明原文地址:https://kaotiyun.com/show/7Kcp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
如果在创建表中建立字段“性别”,并要求用汉字表示,其数据类型应当是()。
某系统结构图如下图所示(图中n≥5)该系统结构图的宽度是()。
若窗体Frml中有一个命令按钮Cmdl,则窗体和命令按钮的Click事件过程名分别为()。
线性表的长度为n。在最坏情况下,比较次数为n—1的算法是()。
在长度为n的顺序表中查找一个元素,假设需要查找的元素一定在表中,并且元素出现在表中每个位置上的可能性是相同的,则在平均情况下需要比较的次数为()。
某完全二叉树共有256个结点,则该完全二叉树的深度为()。
在考生文件夹下,“sampl.accdb”数据库文件中已建立两个表对象(名为“员工表”和“部门表”)和一个窗体对象(名为“fTest”)及一个宏对象(名为“mTest”)。试按以下要求,按顺序完成对象的各种操作:(1)将编号为“000002”员工的“照片
如果有VBA的过程头部为:PrivateSubBstData(ByValabcAsInteger)则变量abc遵守的参数传递规则是()。
Select语句中有子句“Where工资额>1000”,该子句的含义是()。
下列循环结构中,循环体被执行的次数是()。DimiAsInteger,tAsIntegerFori=9to0t=t+1Next1
随机试题
ABC公司是一零售业上市公司,2017年年度的财务报表数据如下:有关2018年预测资料如下:(1)预计营业增长率为20%,即营业收入为3024万元;(2)预计毛利率上升5个百分点;(3)预计经营和管理费用的变动部分与营业收入的百分比不变;(
B
具有明显的形态方向且与原有的趋势方向相反的整理形态有()
某工程项目业主委托了一监理单位进行监理,在委托监理任务之前,业主与施工单位已经签订施工合同。监理单位在执行合同中陆续遇到一些问题需要进行处理,若你作为监理工程师,对遇到的下列问题,请提出处理意见。问题:(1)在施工招标文件中,按工期定额计算,工期为5
某工程计划中A工作的持续时间为6天,总时差为8天,自由时差为3天。如果A工作实际进度拖延10天,则会影响工程计划工期()。
商业银行项目实施部门应定期向信息科技管理委员会提交重大信息科技项目的进度报告,其内容不包括()。
李静在结婚前与男朋友吴辰协议约定她父母留给她的一套老房子和一些存款为个人特有财产。但不幸的是,3年后,二人因感情不和诉讼离婚。请问法院会判定属于夫妻个人特有财产有()
每一周给7名病人G、H、J、K、L、M、O中的两位做理疗,共四次做完,其中有一位病人做两次理疗,其他病人仅做一次。理疗必须遵循的原则是:在某一周内不能给J做理疗,除非在此之前的一周内给H做了理疗;做了两次理疗的那位病人在第四周内给他做理疗,但不能在第三周内
行政调解主要包括
CATVisashortwayofsaying"communityantenna(天线)television".But"cabletelevision"isthetermmostpeopleuse.Cabletelev
最新回复
(
0
)