首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Timer1的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Circle)。编写程序如下: Private Sub Form Load() Private Sub Timer
窗体上有一个名称为Timer1的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Circle)。编写程序如下: Private Sub Form Load() Private Sub Timer
admin
2019-06-11
58
问题
窗体上有一个名称为Timer1的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Circle)。编写程序如下:
Private Sub Form Load() Private Sub Timer1 Timer(’)
Shapel.Top=0:Timer1.Interval=100 Static X As Integer
End Sub Shape1.Top=Shape1.Top+100
x=x+1
If x Mod 10=0 Then
Shapel.Top=0
End If
End Sub
以下关于上述程序的叙述中,错误的是
选项
A、每执行一次Timer1 Timer事件过程,x的值都在原有基础上增加1
B、Shapel每移动10次回到起点,重新开始
C、窗体上的Shapel由下而上移动
D、Shapel每次移动100
答案
C
解析
在计时器事件中的变量x是一个静态变量,事件结束后其值仍然会保留,所以每执行一次Timei1-Timer。事件过程,x的值都在原有基础上增加1;每次x能被10整除均令形状的Top属性为0,即回到起点:形状控件在计时器事件中每次Top值均增加100,即自上而下进行移动,每次100。
转载请注明原文地址:https://www.kaotiyun.com/show/LRUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画两个标签和一个命令按钮,其名称分别为Label1、Label2和Command1,然后编写如下程序:PrivateSubfune(LAsLabel)L.Caption=”1234”EndSubPr
窗体上有一个名称为Picturel的图片框和一个名称为Timer1的计时器控件,并有下面程序代码:Dimx%,V%PrivateSubForm_Load()x=Picturel.Width*2y=Picture
在VisualBasic中,所谓“文件”指的是()。
能够用于标识对象名称的属性是()。
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Dimarrayl(10,10)AsIntegerDimiAs
如果需要线控件在窗体上成为一条与水平线呈45°的斜线,它的属性值应满足的条件是()。
在满足实体完整性约束的条件下
某系统总体结构图如下图所示:该系统总体结构图的深度是
在关系数据库中,用来表示实体间联系的是
用树形结构表示实体之间联系的模型是
随机试题
体外循环下行主动脉瓣膜置换术的病人需终身抗凝,下列哪些食物不宜用,以免影响抗凝效果()。
治疗咽喉红肿疼痛,兼有肺热咳嗽、痰多者,应首选()
证券投资基金的投资对象为股票、债券和其他证券投资基金。()
根据上述材料,下列表述不正确的是( )。城镇居民生活小康标准的5个方面不包括( )。
某单位男女员工的人数之比是15:13。按人数之比5:7:8,分为甲、乙、丙三个科室。其中甲科室男女员工的人数之比为4:3,乙科室为5:2。则丙科室男女员工人数之比为()。
设A、B、C为事件,P(ABC)>0,则P(AB|C)=P(A|C)P(B|C)的充要条件是()
I’dliketo()aspecialtableforthecomingValentine’sDay.
Listenagaintopartofthelecture,thenanswerthequestion.Whatcanbeinferredaboutthewomanwhenshesaysthis?
ChallengesofWorkingandLivinginaDevelopingCountry1.Findingdifferentcustoms,【T1】andcultures【T1】______Differentways
Onequestionthatworriesmanyvisitorstodefensivecarry.com,awebsitedevotedtothedelightsanddifficultiesoflifewitha
最新回复
(
0
)