首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有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
33
问题
窗体上有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://jikaoti.com/ti/Lmy0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画1个命令按钮和1个文本框,其名称分别为Commandl和Textl,然后编写如下代码:DimSaveAllAsStringPrivateSubCommandl_C1iCk()Text1.Text=Left(UCa
在窗体上画一个文本框,其名称为Text1。为了在程序运行后Text1中的文本不可编辑,应当使用的语句是______。
过程共有3种,它们分别是()。
VisualBasic根据计算机访问文件的方式将文件分成三类,其中不包括______。
下列可以打开立即窗口的操作是______。
假设有如下的记录类型:TypeStudentnumberAsStringnameASStringageAsIntegerEndType则正确引用该记录类型变量的代码是_____
在窗体上画两个名称分别为Textl、Text2的文本框,一个名称为Labell的标签,窗体外观如图a所示。要求当改变任一个文本框的内容,就会将该文本框的内容显示在标签中,如图b所示。实现上述功能的程序如下:Priva
已知变量boo1Var是一个布尔型的变量,如果要给其赋值为True,则正确的赋值语句就是______。
在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()x=0n=InputBox("")Fori=1Ton
以下叙述中错误的是______。
随机试题
辊轴支座(又称滚动支座)属于()。
支气管扩张患者咳嗽、咳痰加重多见于()。
阴虚火旺型汗证可用肺气不固型汗证可用
在社会主义市场经济条件’F,宏观经济调控有其主要目标,下列描述有误的是()。
影响进度的不利因素中,( )是最常见和最重要的影响因素。
《税收征收管理法》于()实施。
()是指组织成员的共同价值观体系,它使组织独具特色。
民航的运输飞行主要有()形式。
下列有关表述不符合党的十九大报告原文的是()。
简述董仲舒三大文教政策。
最新回复
(
0
)