Question

请问高手，想让窗体里的一段文字慢慢地向右移动，文字消失后，文字再从窗体左端出现，再移动，用vb怎样写

Answer 1

Private Sub Command1_Click()
Timer1.Enabled = Not (Timer1.Enabled) '暂停功能
Command1.Caption = IIf(Timer1.Enabled = False, "开始", "暂停")
Label1.AutoSize = True '如果你文字很长，这个不要
End Sub

Private Sub Form_Load()
Label1 = "输入你要求的文字"
Timer1.Enabled = False
Timer1.Interval = 50 '速度,越小越快
Command1.Caption = "开始"
End Sub

Private Sub Timer1_Timer()
Label1.Left = Label1.Left + 20 '速度，越大越快
If Label1.Left > Form1.Width Then Label1.Left = -Label1.Width
End Sub

'程序加一个按钮，一个label1. 一个计时器，选我为最佳 呵呵 ，不明白可问我。

Answer 2

sub timer1_timer()
label1.left=iif(label.left>me.width,-label1.width,label1.left+10)
end sub
sub form_load()
timer1.interval=30
end sub

Answer 3

此问题答案:

服务器太烂有的时候进不去...请谅解
字数限制100字,没法在这里回复