男人踮脚尖的好处:VB.net字体流动

来源:百度文库 编辑:高校问答 时间:2024/04/29 19:53:22
VB.net怎样实现字体从上往下流动,谁帮我该下下面这个程序啊
If Label1.Top + Label1.Height > 0 Then
Label1.Top = Label1.Top + 30
Else
Label1.Top = Me.Height
移动到下边不见了以后不重新从上面出来了

应该是:
If Label1.Top > Me.Height Then
Label1.Top = 0
Else
Label1.Top = Label1.Top + 10
end if
(把这段加到时间控件里,并设置时间控件的interval属性为1)

bu 不知道