窗体上有1个Timer1计时器，1个Shapel形状控件，还有下面程序代码： Dim flag As Boolean Private Sub Timer1_Timer() Private Sub Form_Load()

admin2020-01-02 19

问题窗体上有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/UITp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

窗体上有1个Timer1计时器，1个Shapel形状控件，还有下面程序代码： Dim flag As Boolean Private Sub Timer1_Timer() Private Sub Form_Load()

二级VB

NCRE全国计算机二级

窗体上有一个名称为optionl的单选按钮数组，程序运行时，当单击某个单选按钮时，会调用下面的事件过程PrivateSubOptionI_Click(IndexAsInteger)EndSub下面关于此过程的参数In

复选框是否被选中，取决于复选框的()。

软件需求分析阶段的工作，可以分为四个方面：需求获取、编写需求规格说明书、需求评审和()。

设a=4，b=5，c=6，执行语句Printa

若变量a未事先定义而直接使用(例如：a=0)，则变量a的类型是

在下列关系运算中，不改变关系表中的属性个数但能减少元组个数的是()。

软件按功能可以分为：应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是()。

排卵前血液中黄体生成素出现高峰的原因是：

下列化合物中，与三氯化铁溶液显色的是()。

对流免疫电泳的沉淀线出现在抗原和抗体之间且靠近抗原孔可说明

下列各项关于个人合伙的说法中，正确的是()。

压强的国际单位是()。

在工程实施过程中，单位工程施工组织设计通常按()划分阶段进行检查。

引起缺货问题的原因主要有()。

我国的文物收藏基本可分为()。

Internet采用的主要通信协议是

传输速率最高为54Mbps的WLAN标准是()。