2. 计算机
  3. 在窗体上画一个Timer1计时器控件和一个Shape1形状控件，并编写如下程序 Private Sub Form_Load() Timer1．Interval=1000 Timer1．Enabled=Tme End Sub Private Sub Time

在窗体上画一个Timer1计时器控件和一个Shape1形状控件，并编写如下程序 Private Sub Form_Load() Timer1．Interval=1000 Timer1．Enabled=Tme End Sub Private Sub Time

admin2016-06-23  33
问题 在窗体上画一个Timer1计时器控件和一个Shape1形状控件，并编写如下程序
Private Sub Form_Load()
Timer1．Interval=1000
Timer1．Enabled=Tme
End Sub
Private Sub Timer1_Timer()
If Shape1．Shape=1 Then
Shape1．Shape=3
Else
Shape1．Shape=1
End If
End Sub
运行程序，则看到的结果是
选项 A、交替显示正方形和圆形，每秒交替一次
B、交替显示矩形和椭圆形，每秒交替一次
C、显示正方形，每秒闪烁一次
D、显示椭圆形，每秒移动一次
答案A
解析 Interval属性用来设置计时器事件之间所间隔的毫秒数(ms)，每隔1000毫秒即每隔1秒产生一个Timer事件。当Shape属性设置形状控件的形状。在Timer事件中，如果形状控件的形状为正方形(即Shape为1)，形状控件形状变为圆形(即Shape为3)；故选项A正确，其他选项均错误。
转载请注明原文地址:https://kaotiyun.com/show/jcLp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)