请问从底部到顶部的滚动字幕代码怎么写？

[此贴子已经被作者于2006-12-5 16:59:10编辑过]

判断它的top就行.

怎么判断呢?

Private Sub Timer2_Timer()

Label1.Top = Label1.Top - 10
If Label1.Top <= 0 Then
Label1.Top = Form1.Height

End If

End Sub