首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个Timer1计时器,1个Shapel形状控件,还有下面程序代码: Dim flag As Boolean Private Sub Timer1_Timer() Private Sub Form_Load()
窗体上有1个Timer1计时器,1个Shapel形状控件,还有下面程序代码: Dim flag As Boolean Private Sub Timer1_Timer() Private Sub Form_Load()
admin
2017-04-25
56
问题
窗体上有1个Timer1计时器,1个Shapel形状控件,还有下面程序代码:
Dim flag As Boolean Private Sub Timer1_Timer()
Private Sub Form_Load() If flag Then
flag=True Shapel.Height=Shapel.Height*2
Timer1.Enabled=True Shapel.Width=Shapel.Width*2
Timer1.Interval=1000 Else
End Sub Shapel.Height=Shapel.Height*0.5
Shapel.Width=Shapel.Width*0.5
End If
flag=Not flag
End Sub
执行程序所产生的效果是
选项
A、Shapel的尺寸在缩小到原来一半和恢复原状这2种状态间切换,每秒切换一次
B、Shapel的尺寸在扩大到原来2倍和恢复原状这2种状态间切换,每秒切换一次
C、Shapel的尺寸在缩小到原来一半和扩大到原来2倍这2种状态间切换,每秒切换一次
D、Shapel的尺寸会不断扩大
答案
B
解析
在计时器事件中会判断窗体级变量flag的值,如果为真则形状尺寸扩大一倍,否则缩小到一半。由于第一次开始计时器事件的时候flag的值为True,所以首先会将形状扩大一倍,然后第二次计时器事件将形状恢复原状。
转载请注明原文地址:https://kaotiyun.com/show/VFGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
滚动条的最小值属性是______,最大值属性是Max。
在窗体上有一个命令按钮Command1,通用过程fun和命令按钮的事件过程如下:PrivateFunctionfun(ByValmAsInteger)IfmMod2=0Thenfun=
有如下程序:PrivateSubForm_CHck()DimiAsInteger,sumAsIntegersum=0Fori=2TO10IfMod2<>
假设有如下的记录类型:TypeStudentnumberAsStringnameASStringageAsIntegerEndType则正确引用该记录类型变量的代码是_____
下面运行程序后,单击命令按钮,输出的结果是【】。PrivateSubCommand1_Click()Dima%(1To5),i%,s#Fori=1To5a(i)=iNexts=Fun(a)Print"s
假定建立了一个工程,该工程包括两个窗体,其名称(Name属性)分别为Form1和Form2,启动窗体为Form1。在Form1上画一个命令按钮Command1,程序运行后,要求当单击该命令按钮时,Form1窗体消失,显示窗体Form2,请将下面的程序补充
为了使用窗体输出,使Print方法在Form_Load事件中起作用,必须设置窗体的()属性。
模块级变量的声明关键字是Dim或______。
下列关于文件的叙述中,错误的是()。
随机试题
承担工程施工阶段的监理、监理机构应进驻施工现场。()
ISO提出的基于______的管理框架是现代网络管理体系结构的核心。
结肠小袋纤毛虫主要寄生部位为
男性,50岁,患肝硬化3年,出现腹水2个月,间断服用螺内酯。2天来无诱因全腹痛,腹围增大,发热38.5℃,继而出现嗜睡。血常规示WBC4.2×109/L,分类杆状核粒细胞占9%,分叶核粒细胞占80%,该患者病情变化最可能的原因是
A.3~4个月B.3~6个月C.8~9个月D.1岁左右E.3岁以后佝偻病患儿出现方颅的时间是
正中神经的运动传导刺激为
男,6岁。右侧阴囊包块,平卧后不消失,透光试验阳性。应考虑的诊断是
下列关于投资性房地产的后续计量的表述中,正确的有()。
运动会上100名运动员排成一列,从左向右依次编号为1一100,选出编号为3的倍数的运动员参加开幕式队列,而编号为5的倍数的运动员参加闭幕式队列。问既不参加开幕式又不参加闭幕式队列的运动员有多少人?()
Directions:Forthispart,youareallowed35minutestowriteacompositiononthetopic"StudyingOverseas".Youshouldbas
最新回复
(
0
)