首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Timerl的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Circle)。编写程序如下: Private Sub Form Load()Private Sub Timerl_Tmer() Shapel.Top=0
窗体上有一个名称为Timerl的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Circle)。编写程序如下: Private Sub Form Load()Private Sub Timerl_Tmer() Shapel.Top=0
admin
2015-12-09
53
问题
窗体上有一个名称为Timerl的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Circle)。编写程序如下:
Private Sub Form Load()Private Sub Timerl_Tmer()
Shapel.Top=0:Timerl.Interval=100Static x As Integer
End SubShapel.Top=Shapel.TOp+100
x=x+1
Ifx Mod 10=0 Thell
Shape1.Top=0
End If
End Sub
选项
A、每执行一次Timerl Timer事件过程,x的值都在原有基础上增加1
B、Shapel每移动10次回到起点,重新开始
C、窗体上的Shapel由下而上移动
D、Shapel每次移动100
答案
C
解析
在计时器事件中的变量x是一个静态变量,事件结束后其值仍然会保留,所以每执行一次Timer1 Timer事件过程,x的值都在原有基础上增加1;每次x能被10整除均令形状的。Top属性为0,即回到起点;形状控件在计时器事件中每次Top值均增加100,即自上而下进行移动,每次100。
转载请注明原文地址:https://kaotiyun.com/show/08Lp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()c="ABCD"Forn=1To4Print______NextEndSub
计时器文件设置时间间隔的属性是
在窗体上画一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编写如下程序:PrivateSubCommand1_Click()a=InputBox("请输入日期(1~31)")t="旅游景点:"&I
窗体中有图片框(Picture1)和计时器(Timer1)两个控件。程序运行时,将图片加载到图片框中,然后图片框以每秒一次的速度向窗体的右下角移动,每次向左、向右移动300twip。请填空。PrivateSubForm_Load()Picture1
为了防止用户随意将光标置于控件上,应()。
以下关于图片框控件的说法中,错误的是()。
常用控件的Style属性值是()。
随机试题
社会行政管理主要包括的内容有()
A.轻型口疮B.疱疹型溃疡C.腺周口疮D.疱疹性口炎E.贝赫切特(白塞)综合征复发性口疮同时或先后交替出现眼、外生殖器及皮肤病变,称
A.具发汗平喘作用B.具抗菌作用C.具镇痛作用D.具镇静麻醉作用E.具消肿利尿抗肿瘤作用粉防己碱
表示两变量之间回归关系强度的指标是
安全预警设置(),在日常活动中负责培训员工的预警知识和各种逆境的预测与模拟预警管理方案,在特别状态时提出建议供决策层采纳。
下列关于差异化战略的表述中,错误的有()。
在边防沙漠地带,巡逻车每天行驶200千米,每辆巡逻车载可供行驶14天的汽油。现有5辆巡逻车,同时从驻地A出发,完成任务后再沿原路返回驻地。为了让其中三辆尽可能向更远的距离巡逻(然后再一起返回),甲、乙两车行至途中B处后,仅留足自己返回驻地所需的汽油,将其余
某财政主管部门被发现有部门人员买IPHONE4当U盘。用高配奢华的电脑来处理数据,采购奢华办公套椅,与国家中央要求的坚持不浪费格格不入,请问若你是财政负责人。遇到这情况。你怎么办?
气候变化影响了咖啡种植,咖啡危机已在酝酿。气温和降水变化会降低咖啡的产量和质量,增加病虫害压力。研究显示,气温平均升高2℃会增加疾病(咖啡叶锈病)和害虫(咖啡虎天牛)的风险。事实上,大部分具有可能性的解决方案,或是代价昂贵,或是有负面后果。因而,需要研究更
CrowsareprobablythemostfrequentlymetandeasilyidentifiablemembersofthenativefaunaoftheUnitedStates.Thegreatn
最新回复
(
0
)