首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Timerl的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Cir—cle)。编写程序如F: Privale Sub Form_LJmd() Shapel.Top=0 Tirnerl.Int
窗体上有一个名称为Timerl的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Cir—cle)。编写程序如F: Privale Sub Form_LJmd() Shapel.Top=0 Tirnerl.Int
admin
2018-09-19
66
问题
窗体上有一个名称为Timerl的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Cir—cle)。编写程序如F:
Privale Sub Form_LJmd()
Shapel.Top=0
Tirnerl.Interval=100
End Sub
Private SubTimerl Timer() Static X As Integer
Shapel.Top=Shapel.Top+100
X=X+l
If X M0d 10:0 Then
Shapel.Top=0
End If
End Sub。
以下关于上述程序的叙述中,错误的是( )。
选项
A、每执行一次Timerl_Timer事件过程,X的值都在原有基础上增加1
B、Shapel每移动10次叫到起点,重新开始
C、窗体上的Shapel由下而上移动
D、Shapel每次移动100
答案
C
解析
题目中变量X定义为Stalic,即每次进入Timer事件过程时,x都会保留上次的值,从而实现每执行一次Timerl_Titmer事件过程X的值都在原有的基础上增加。程序中判断调用Timer 事件过程10次后,重置Shapel的top值为0,即回到起点。控件Shapel的Top属性是距离窗体项的位置,数值越大距离越远,因此Shapel会由上向下多动。
转载请注明原文地址:https://kaotiyun.com/show/nBFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有如下程序代码:PrivateSubForm_Click()Dima(3,3)AsIntegerForI=1To3Forj=1To3Ifj>1And
有如下程序:PrivateSubForm_Click()DimBAsStringDimmAsInteger,DecAsIntegerB=InputBox("请输入一个二进制数")m=L
有如下通用过程:SubSa(aAsInteger,bAsInteger)b=at=a/bb=tModbEndSub在窗体上画一个Command1命令按钮,然后编写如下事件过程:Priv
窗体上有1个名称为Command1的命令按钮,事件过程及函数过程如下:PrivateSubCommand1_Click() DimmAsString m=InputBox("请输入字符串") Printpick_str(m)En
语句DimArr(-2To4)AsInteger所定义的数组的元素个数为( )。
下列叙述中错误的是
对于某些控件,只要将其Style属性设置为1,则可以在该控件上使用Picture属性显示图片。以下不具备这一使用规则的控件是
如果在窗体模块中所有程序代码的前面有语句:Dimx,则x是( )。
有如下数据定义语句:Dima,bAsIntegerDimx%,yasInteger执行上述语句后,不是整型变量的是
某二叉树的中序序列为DCBAEFG,后序序列为DCBGFEA,则该二叉树的深度(根结点在第1层)为
随机试题
解释下列句子中划线的词语将有西师过轶我。
肾小球滤过率是指每分钟()。
关于毒品犯罪,下列哪些选项是正确的?(2010年卷二60题)
死刑可以缓期()年执行。
一项有效的承诺,必须由受要约人向要约人提出;且应符合()。
当前,我们该如何坚持以科学发展观统领经济社会发展全局?
Thenexttimethemenweretakenupontothedeck,Kuntamadeapointoflookingatthemanbehindhiminline,theonewholaid
以下是一场关于“安乐死是否应合法化”的辩论中正反方辩手的发言:正方:反方辩友反对“安乐死合法化”的根据主要是在什么条件下方可实施安乐死的标准不易掌握,这可能会给医疗事故甚至谋杀造成机会,使一些本来可以挽救的生命失去最后的机会。诚然,这样的风险是存在
TheEconomistcalculatesthataroundtheworldalmost290million15-to24-year-oldsareneitherworkingnorstudying:almosta
Therecentsurgeinoilpricestoroughly$55abarrelteachessomeusefullessons.Oneisthatsurpriseshappen.Ayearagofut
最新回复
(
0
)