2. 计算机
  3. 窗体上有一个名称为Picture1的图片框和一个名称为Timer1的计时器控件，并有下面程序代码： Dim x％，y％ Private Sub Form_Load() x=Picture1．Width*2 y=Picture1．Height*2 Timer

窗体上有一个名称为Picture1的图片框和一个名称为Timer1的计时器控件，并有下面程序代码： Dim x％，y％ Private Sub Form_Load() x=Picture1．Width*2 y=Picture1．Height*2 Timer

admin2020-02-27  43
问题 窗体上有一个名称为Picture1的图片框和一个名称为Timer1的计时器控件，并有下面程序代码：
Dim x％，y％
Private Sub Form_Load()
x=Picture1．Width*2
y=Picture1．Height*2
Timer1．Enabled=True
Timer1．Interval=100
End Sub
Private Sub Timer1_Timer()
If Picture1．Width＜x Or Picture1．Height
＜y Then
Picture1．Width=Picture1．Width+3
Picture1．Height=Picture1．Height+3
End If
End Sub
程序运行后产生的效果是(    )。
选项 A、图片框尺寸不断变大，直到其高和宽都增加到原来的2倍为止
B、图片框尺寸不断变大，并一直增加下去
C、图片框尺寸不断变大，直到其高和宽都增加到原来的3倍为止
D、界面没有产生任何变化
答案A
解析 在所有程序之前定义了全局变量x和y，所以变量x和y的作用域为所有过程。在Form_Load事件过程中，对变量x和y进行了初始化，并启用了计时器控件，每隔100毫秒(0．1秒)，触发一次计数器事件。Timer1_Timer。在计时器事件中利用if语句判断图片的高度和宽度是否超过图像本身尺寸的2倍，若未超过，则将图片的高度和宽度分别增加3个twip单位。所以A选项正确。
转载请注明原文地址:https://kaotiyun.com/show/LjTp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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