首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Timer1的计时器控件,一个名称为Shape1的形状控件,其Shape属性值为3(Circle)。编写程序如下: Private Sub Form_Load() Shape1.Top=0 Timer1.Interval=100
窗体上有一个名称为Timer1的计时器控件,一个名称为Shape1的形状控件,其Shape属性值为3(Circle)。编写程序如下: Private Sub Form_Load() Shape1.Top=0 Timer1.Interval=100
admin
2018-05-08
31
问题
窗体上有一个名称为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都会保留上次的值,从而实现每执行一次Timer1_Timer事件过程x的值都在原有基础上增加1。程序中判断调用Timer事件过程10次后,重置Shape1的top值为0,即回到起点。控件Shape1的Top属性是距离窗体顶的位置,数值越大距离越远,因此Shape1会由上向下移动。
转载请注明原文地址:https://kaotiyun.com/show/gqGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下能从字符串”VisualBasic”中直接取出子字符串“Basic”的函数是()。
窗体上有两个名称分别为Textl、Text2的文本框,一个名称为Commandl的命令按钮。设有如下的类型声明:TypePersonnameAsString*8majorAsString*20EndType当单击命令按钮时,将两个文本框
以下叙述中正确的是()。
窗体上有1个名称为Textl、内容为空的文本框。编写如下事件过程:PrivateSubTextl_KeyUp(KeyCodeAsInteger,ShiftAsInteger)PrintTextl.Text;En
窗体上有一个名称为CDl的通用对话框,一个名称为Commandl的命令按钮,相应的事件过程如下:PrivateSubCommandl_Click()CD1.Filter=”AllFile|*.*|TextF
假定通过复制、粘贴操作建立了一个命令按钮数组Commandl,以下说法中错误的是
以下不可以作为“容器”的控件是
命令按钮、单选按钮、复选框都可以通过Picture属性在控件上显示图片,但需事先设置某一属性,该属性为
以下说法中正确的是
随机试题
Advertisingfollowsuseverywhere.Wheneverweturnonthetelevision,listentotheradiooropenanewspaperoramagazine,we
Ourtraditionalbeliefhasitthatmorninglarksaremostlikelytobehealthy,wealthyandwise.Butthosewhoareearlytobed
你(LiYuan)是班长,准备周末组织全班同学参观历史博物馆(theMuseumofHistory)。请根据以下提示写一个通知:(1)周六上午8点,全班在校门口集合,乘公共汽车前往;(2)参观时,要认真听讲并记录重要内容;(3)遵
A.后降支B.左旋支C.左前降支D.右前降支冠状动脉粥样硬化症最常累及冠状动脉的
症见吐血、便血、皮肤出现紫斑点,伴有神疲乏力,心悸气短,属于
患者女性,26岁。孕36周,尿频、尿急、尿痛3天,伴阴道分泌物增多。查体:尿道口及宫颈口均可见脓性分泌物。
企业获得的下列数值中,属于第二层次输入值的是()。
道德统一性包含两层含义,_________和寻求超越性意义。
公安政策是由公安机关制定的政策。()
Bothaperson’sheredityandhisenvironmenthelptoshapehischaracter.
最新回复
(
0
)