首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Timerl的计时器控件,一个名称为Shapel的形状控件,其Shape属 性值为3(Circle)。编写程序如下: Private Sub Form_Load0 Shapel.Top=0:Timer1.Interval=1
窗体上有一个名称为Timerl的计时器控件,一个名称为Shapel的形状控件,其Shape属 性值为3(Circle)。编写程序如下: Private Sub Form_Load0 Shapel.Top=0:Timer1.Interval=1
admin
2020-01-02
30
问题
窗体上有一个名称为Timerl的计时器控件,一个名称为Shapel的形状控件,其Shape属 性值为3(Circle)。编写程序如下:
Private Sub Form_Load0
Shapel.Top=0:Timer1.Interval=1 00
End Sub
Private Sub Timer l_Timer()
Static x As Integer
Shapel.Top=Shapel.Top+100
x=x+1
If x Mod 1 0=0 Then
Shapel.Top=0
End If
End Sub
以下关于上述程序的叙述中,错误的是
选项
A、每执行一次Timerl_Timer事件过程,x的值都在原有基础上增加1
B、Shapel每移动10次回到起点,重新开始
C、窗体上的Shapel由下而上移动
D、Shapel每次移动100
答案
C
解析
在计时器事件中的变量x是一个静态变量,事件结束后其值仍然会保留,所以每执行一次Timerl Timer事件过程,x的值都在原有基础上增加1;每次x能被10整除均令形状的Top属性为0,即回到起点;形状控件在计时器事件中每次Top值均增加100,即自上而下进行移动,每次100 。
转载请注明原文地址:https://kaotiyun.com/show/wbTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有一个有10个元素的数组,下列程序将该数组的第1个元素与第10个元素交换,第2个元素与第9个元素交换……,第5个元素与第6个元素交换,在横线处应填写()。PrivateSubCommand1_Click()Dima(1
下列不一定是传值的虚实结合方式的选项是()。
下面的数写成普通十进制数是()。8.6787E+8
设有如下过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)EndSubPrivateSubFor
下面有关标准模块的叙述中,错误的是()。
标准模块中有如下程序代码:PublicxAsInteger,YAsIntegerSubTempSub()x=10:y=20EndSub在窗体上有1个命令按钮,并有如下事件过程:Pri
(1)在名称为Form1,标题为“选课”的窗体上添加一个复选框数组,名称为CH1,共有四个复选框,按顺序其标题分别是“数学”、“语文”、“外语”、“计算机”,其中“语文”、“计算机”复选框处在选中状态下,程序运行时的窗体如图所示。请按要求添加控件并设置相应
以下关于过程的叙述中,错误的是
假定有以下循环结构DoUrntil条件循环体Loop则正确的描述是()。
随机试题
指示对乙肝病毒感染有保护作用的指标为
A.石膏B.知母C.芦根D.天花粉E.栀子功能清热泻火,滋阴润燥的药物是
男性,18岁,近1年来对家人亲友变得冷淡,不去上学,不洗澡,不主动更换衣服,对与自己有关的各种事情表现得无动于衷。最可能的诊断是
某女,55岁。与家人口角后出现胁肋胀痛,脘腹灼热疼痛,口苦,舌红苔黄,脉弦数。用药首选
排便时有鲜血滴出,常见于
图5-11所示为一三角拖架,AB为钢杆[σ]1=40MPa,A1=14cm2,BC为木杆[σ]2=10MPa,A2=100cm2,ABC连接处均可视为铰接,从强度方面计算竖向荷载F的最大许用值为()。
以下各项中,既与外部因素有关。又与内部因素有关的是()。
2012年1~5月,规模以上轻工企业累计实现工业总产值66933.3亿元,同比增长18.4%:5月份完成工业总产值14777.1亿元,同比增长15.7%。农副食品加工、塑料制品、食品制造、造纸、家电、皮革及制鞋、酿酒、五金、工美、家具、软饮料等11个行业累
查询“仓库”表的所有记录并存储于临时表文件temp中的SQL语句是()。
Ananimalspeciesbecomesextinctwhenitfailstoproduceenoughyoungineachgenerationtokeeppacewiththedeath-rate.We
最新回复
(
0
)