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

老师，我想在面板中放几个标签，让标签在面板中循环移动，请问是否可以实现？？

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

 

谢谢了

老师，我想问一下left，width等这些属性帮助里都没有，在哪里可以查到，或者是在命令窗口执行什么代码可以查到？？谢谢

如果要得到属性方法，这样写

 

Dim o = Forms("窗口1")

For Each c As object In o.Gettype.getproperties
    output.show(c.name)
Next
For Each c As object In o.Gettype.getMethods
    output.show(c.name)
Next

 

或者去查msdn https://msdn.microsoft.com/zh-cn/library/system.windows.forms.form_members(v=vs.80).aspx

 

好的，谢谢老师