首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个Timer1计时器,1个Shape1形状控件,还有下面程序代码: Dim flag As Boolean Private Sub Timer1_Timer() Private Sub Form_Load(
窗体上有1个Timer1计时器,1个Shape1形状控件,还有下面程序代码: Dim flag As Boolean Private Sub Timer1_Timer() Private Sub Form_Load(
admin
2019-03-08
59
问题
窗体上有1个Timer1计时器,1个Shape1形状控件,还有下面程序代码:
Dim flag As Boolean Private Sub Timer1_Timer()
Private Sub Form_Load() If flag Then
flag=True Shape1.Height=Shape1.Height*2
Timer1.Enabled=True Shape1.Width=Shape1.Width*2
Timer1.Interval=1000 Else
End Sub Shape1.Height=Shape1.Height*0.5
Shape1=Width=Shape1.Width*0.5
End If
flag=Not flag
End Sub
执行程序所产生的效果是
选项
A、Shape1的尺寸在缩小到原来一半和恢复原状这2种状态间切换,每秒切换一次
B、shape1的尺寸在扩大到原来2倍和恢复原状这2种状态fnq切换,每秒切换一次
C、Shape1的尺寸在缩小到原来一半和扩入到原来2倍这2种状态间切换,每秒切换一次
D、Shape1的尺寸会不断扩大
答案
B
解析
在计时器事件中会判断窗体级变量flag的值,如果为真则形状尺寸扩大一倍,否则缩小到一半。由于第一次开始计时器事件的时候nag的值为Tnle,所以首先会将形状扩大一倍,然后第二次计时器事件将形状恢复原状。
转载请注明原文地址:https://kaotiyun.com/show/PlFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
若要把窗体上命令按钮Command1的状态设置为不可用,应该执行的命令是( )。
设工程中有2个窗体:Form1和Form2,每个窗体上都有一个名称为Text1的文本框。若希望把Form1上文本框中的内容复制到Form2上的文本框中,应进行的操作是
以下不能触发滚动条Change事件的操作是( )。
在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Label1,然后编写如下事件过程:PrivateSubCommand1_Click() Dimarr(10) Fori=6To10 arr(i)=i-5 N
优化数据库系统查询性能的索引设计属于数据库设计的
已知过程定义的首行为Subsum(aAsInteger,bAsInteger),则下面过程调用语句中正确的是()。
设有如下表所列的菜单结构:要求程序运行后,如果单击菜单项“大图标”,则在该菜单前添加一个“√”。以下正确的事件过程是
设窗体上有一个名称为Option1的单选按钮数组(其下标从0开始),共有4个单选按钮,并有下面事件过程:PrivateSubOption1_Click(IndexAsInteger)n=IndexIfIndex<3
某系统总体结构图如下图所示:该系统总体结构图的深度是( )。
下列说法中,错误的是
随机试题
A、Protecttheeyesightoftheyoungergeneration.B、Takeeffectivemeasurestoraiseproductivity.C、Realizethedisruptiveeffe
清热利湿宜生用,健脾止泻宜炒用的药物是
静脉注射高浓度的葡萄糖溶液后,尿液增多的原因是()。
下列各项行为中,属于代理的是:
有一栋四层公寓,每层建筑面积相等,已知第二层的房地价值为第一层的1.05倍,第三层的房地价值为第四层的1.15倍,第四层的房地价值为第二层的91%。按房地价值分摊法计算得出第三层占有的土地份额约为27%。()
线路的平面控制宜采用()进行布设。
下列单代号网络图中,违反绘图规则的错误地方有()。图1单代号网络图
现在有八个箩筐排成一排,已知每个箩筐里都有不同个数的苹果(大于等于1),从第三个箩筐开始,每个箩筐里面的苹果个数是前边两个箩筐苹果个数之和,已知第五个箩筐里面的苹果个数为7,那么第七个箩筐的苹果个数为()个。
促进个人与社会的和谐,要
设某曲线L的线密度μ=x2+y2+z2,其方程为x=e’cost,y=e’sint,z=,-∞<t≤0.求曲线L的弧长l;
最新回复
(
0
)