如何做一个全屏跑马灯?
如何做一个全屏跑马灯?
跑马灯?
内容????
定义一个全局变量,这个变量保存着每次移动的距离,默认单位是缇,可以不用改。
全屏会不会,不会找上个月的贴子。
跑马灯,文字内容用一个标签,设置背景透明,自动大小。设置好字体,字号来。
用定时器里的代码:
Label1.Left=Label1.Left+ 移动距离。
If Label1.Left > Me.ScaleWidth + Label1.Width or Label1.Left <=0 Then
移动距离=-移动距离
end if