首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Timerl的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Circle)。编写程序如下: Private Sub Form_Load() Shape1.Top=0 Timer1.Inter
窗体上有一个名称为Timerl的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Circle)。编写程序如下: Private Sub Form_Load() Shape1.Top=0 Timer1.Inter
admin
2019-08-21
25
问题
窗体上有一个名称为Timerl的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Circle)。编写程序如下:
Private Sub Form_Load()
Shape1.Top=0
Timer1.Interval=100
End Sub
Private Sub Timer1_Timer()
Static x As Integer
Shape1.Top=Shape1.Top+100
x=x+1
If x Mod 10=0 Then
Shape1.Top=0
End If
End Sub
以下关于上述程序的叙述中,错误的是( )。
选项
A、每执行一次Timer1_Timer事件过程,X的值都在原有基础上增加1
B、Shape1每移动10次回到起点,重新开始
C、窗体上的Shape1由下而上移动
D、Shape1每次移动100
答案
C
解析
题目中变量x定义为Static,即每次进入Timer事件过程时,x都会保留上次的值,从而实现每执行一次TimeH_Timer事件过程x的值都在原有基础上增加1。程序中判断调用Timer事件过程10次后,重置shapel的top值为0,即回到起点。控件shape1的T叩属性是距离窗体顶的位置,数值越大距离越远,因此shape1会由上向下移动。
转载请注明原文地址:https://kaotiyun.com/show/sOUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Combo1的组合框,为了引用Combo1中最后一个列表项,应使用的表达式是
窗体上有一个名称为Commandl的命令按钮。其单击事件过程如下:PrivateSubCommandl_Click()Open"c:\f1.txt"ForInputAs#1:Open"c:\f2,txt"ForOutputAs#2
设菜单编辑器中各菜单项的属性设置如下表所示针对上述属性设置,以下叙述中错误的是
默认情况下,下面声明的数组的元素个数是Dima(5,-2To2)
(1)在考生文件夹中有工程文件sjt3.vbp,其中的窗体如图4所示。程序刚运行时,会生成一个有10个元素的整型数组。若选中“查找最大值”(或“查找最小值”)单选按钮,再单击“查找”按钮,则找出数组中的最大值(或最小值),并显示在标签Labe12中。请去
下列选项中不属于软件生命周期开发阶段任务的是()。
下列关于二叉树的叙述中,正确的是()。
以下说法中正确的是()。
在满足实体完整性约束的条件下
以下关系表达式中,其值为True的是
随机试题
下面关于Flash的遮罩动画的叙述,错误的是_______。
脑干内一般躯体感觉核有____________,____________和____________核。
某人持有一公司的优先股,每年年末可获得10000元股息,若利率为8%,则该人持有的优先股的现值是()元。
生产者为防止需求不确定性和供应不确定性带来的缺口而设置的一定数量的存货,被称为()。
企业为外购存货发生的下列各项支出中,应计入存货成本的有()。
甲公司为增值税一般纳税人,适用的增值税税率为13%,2019年11月份发生的与职工薪酬有关的事项如下:(1)11月1日,支付本月职工宿舍的租金20万元,该宿舍为免费提供给生产人员的福利。(2)11月3日,公司销售部门发生固定资产修理费
“葬我于高山之上兮,望我大陆。大陆不可见兮,只有痛哭!葬我于高山之上兮,望我故乡。故乡不可见兮,永不能忘!天苍苍,野茫茫。山之上,国有殇!”原国民党元老于右任在《望大陆》这首诗中对祖国大陆的魂牵梦绕体现了()。
病例:患者,男,76岁,脑卒中导致昏迷10天。为提高插胃管成功率的做法有()。
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是
BritishteachingunionsSundaycautiouslywelcomedgovernmentplanstoextendschoolopeninghoursforpupilsagesunder14that
最新回复
(
0
)