主题：关于标签的循环移动

TimerTick事件

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

http://www.foxtable.com/webhelp/scr/1301.htm