TimerTick事件
Dim lbl As WinForm.Label = e.Form.Controls("Label1")If lbl.left+lbl.width > 0 Then lbl.left -= 10Else lbl.left = e.form.widthEnd If