首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Timer1的计时器控件,一个名称为Shape1的形状控件,其Shape属性值为3(Circle)。编写程序如下: Private Sub Form_Load() Shape1.Top=0 Timer1.Inter
窗体上有一个名称为Timer1的计时器控件,一个名称为Shape1的形状控件,其Shape属性值为3(Circle)。编写程序如下: Private Sub Form_Load() Shape1.Top=0 Timer1.Inter
admin
2018-07-11
109
问题
窗体上有一个名称为Timer1的计时器控件,一个名称为Shape1的形状控件,其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都会保留上次的值,从而实现每执行一次Timen_Timer事件过程x的值都在原有基础上增加1。程序中判断调用Timer事件过程10次后,重置shapel的top值为0,即回到起点。控件shapel的Top属性是距离窗体顶的位置,数值越入距离越远,囚此shapel会由上向下移动。
转载请注明原文地址:https://kaotiyun.com/show/6zFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
VB中,若没有显式声明变量的数据类型,则默认的类型是
以下叙述中错误的是
假定有如下情况语句:SelectCaseX能表示|X|>5的Case子句是
在下面语句或函数中,不能描述选择结构的是
在窗体上画一个名称为List1的列表框,然后编写如下程序:PrivateSubForm_Click()Fori=1To10Item="Item"&i:List1.AddItemItemNextiEndSub程序
VB中有3个键盘事件:KeyPress、KeyDown、KeyUp,若光标在Text1文本框中,则每输入一个字母
假定有以下程序段Fori=lTo3Fori=5To1Step-1Printi*jNextjNexti则语句Printi*j的执行次数是
在学校中,“班级”与“学生”两个实体集之间的联系属于()关系。
要计算x的平方根并放入变量y,正确的语句是( )。
下列说法中正确的是
随机试题
在通过试加工检测刨床的工作精度中,试件两侧平面的平行度,当最大刨削长度不大于320mm时,公差为()mm。
多根多处肋骨骨折导致呼吸衰竭的主要原因是_______。
男性,42岁,5年前体检发现HBsAg(+),但肝功能正常,未予理会。近2个月来感到体力和食欲均减退:查ALT240IU/L,TBil为40μmol/L,HBsAg(+)。最有可能的诊断是
小儿最常见的结核病是
背景某施工单位承建了天津市某医院门诊楼工程。地下2层,地上16层,钢筋混凝土筏板基础,地上结构为钢筋混凝土框架结构,墙充填为普通混凝土小型空心砌块。施工过程中发生如下事件:事件一:本工程基坑深8.5m,北侧紧邻某住宅楼。经专家论证后的方案采用围护桩墙+
基金管理人应当设立监察稽核部门,对()负责,开展监察稽核工作。
某制造企业为增值税一般纳税人,适用17%的增值税税率。2015年,该企业自行核算主营业务收入为2700万元,其他业务收人200万元,投资收益1100万元;扣除项目金额合计2865万元,实现利润总额1135万元。经注册会计师审核,发现下列情况:
IntheimplementationofVLSMtechniquesonanetworkusingasingleClassCIPaddress,whichsubnetmaskisthemostefficient
Happinessusedtohaveamuchbroadermeaning—tiedtotheideaofa______andmeaningfullife—butnowit’salmostindistinguishab
5TipstoKnowBeforeYourFirstLabClass1.【T1】theexperimentinadvance【T1】______Followverbal【T2】【T2】______Reviewprinted
最新回复
(
0
)