参考资料:
TimerTick
窗口计时器代码,根据设定的间隔执行。
e参数属性:
Form:表示触发事件的窗口。
示例
本示例可以参考CaseStudy目录下的示例文件:窗口计时器.table
窗口中加入一个标签,要求标签不停地闪烁,而且能够通过按钮控制闪烁速度,以及暂停和开始闪烁。
首先在窗口中加入一个标签,标签文本为“警告”,另外加入四个按钮,分别是暂停、开始、慢速、快速。
然后将窗口的TimerClick事件代码设为:
Dim
Lbl As WinForm.Label = e.Form.Controls("Label1")
If Lbl.ForeColor = Color.Red Then
Lbl.ForeColor = Color.Black
Else
Lbl.ForeColor = Color.Red
End If
SetBounds
统一设置控件的位置和大小。
语法
SetBounds(x, y, Width, Height)
x: 控件的水平位置
y: 控件的垂直位置
Width: 控件宽度
Height: 控件高度
上述参数的单位为像素。