首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Timer1的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Circle)。编写程序如下: Private Sub Form_Load() Shape1.Top=0:Timer1.Interval=1 00
窗体上有一个名称为Timer1的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Circle)。编写程序如下: Private Sub Form_Load() Shape1.Top=0:Timer1.Interval=1 00
admin
2019-04-29
70
问题
窗体上有一个名称为Timer1的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Circle)。编写程序如下:
Private Sub Form_Load()
Shape1.Top=0:Timer1.Interval=1 00
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是一个静态变量,事件结束后其值仍然会保留,所以每执行一次Timer1_Timer事件过程,x的值都在原有基础上增加1;每次x能被10整除均令形状的。Top属性为0,即回到起点;形状控件在计时器事件中每次Top值均增加100,即自上而下进行移动,每次100。
转载请注明原文地址:https://kaotiyun.com/show/xmUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有1个名称为Commandl的命令按钮,事件过程如下:PrivateSubCommand1Click()m=-3.6IfSgn(m)Thenn=Int(m)Elsen=Abs(m)EndIfPrintnEndSub运
设在一个工程的窗体中有如下代码:PublicxAsIntegerPrivateSubForm_Load()DimyAsIntegerEndSub在该工程的标准模块的声明部分有代码:PublicaAsInteger:Private
窗体的MouseUp事件过程如下:PrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)EndSub关于以上定义,以下叙述中错误的是
下面能够将某个变量声明为局部变量的是
在VisualBasic环境下设计应用程序时,系统能自动检查出的错误是
使用菜单编辑器设计菜单时,必须输入的项是()。
下面4个选项中,不是窗体属性的是()。
如果一个直线控件在窗体上呈现为一条垂直线,则可以确定的是()。
下列关于类、对象、属性和方法的叙述中,错误的是()。
软件生命周期是指()。
随机试题
对于早期肝癌错误的描述是
以下关于高血压的病因叙述以下正确的是
天南星具有祛风止痉的功效,故善于治疗的病证是()
循环冷却水系统的控制系统最常用的防腐蚀方法是()
集中式生活饮用水地表水源地()适用于集中式生活饮用水地表水源地一级保护区和二级保护区。
背景材料:某高速公路上下行分离式隧道,洞口间距40m,左线长3216m,右线长3100m,隧道最大埋深500m,进出口为浅埋段,Ⅳ级围岩。洞身地质条件复杂,地质报告指出,隧道穿越地层为三叠系底层,岩性主要为炭质泥岩、砂岩、泥岩砂岩互层,且有瓦斯设
某外商投资企业中工作的美国专家(假定为非居民纳税人),2006年10月份去的由该企业发放的工资收入20000元人民币。其应缴纳的个人所得税为( )元。
张某出于报复动机将赵某打成重伤,发现赵某丧失知觉后,临时起意拿走了赵某的钱包,钱包里有1万元现金,张某将其占为己有。张某取财的行为构成()。
设容器的内表面是由曲线x=y+siny(0≤y≤π/2)绕y轴旋转一周所得的旋转曲面,若以π(m3/s)的速率注入液体。当液面高度为π/4(m)时,求液面上升的速率
WhenwethinkofcreativepeoplethenamesthatprobablycometomindarethoseofmensuchasLeonardodaVinci,AlbertEinstei
最新回复
(
0
)