Question

VB中，一行字从右边移到左边，然后再从右边出现移到左边，代码应该是怎么样的？？求回答~~谢谢！！

我只写到这一步：
Sub mymove()
Label1.Move Label1.Left - 50
If Label1.Left > Form1.Width Then Label1.
接下去怎么试都不对。。。忘大侠指点迷津！！！

Answer 1

要看到动画效果，添加1个Timer控件吧！就是控件工具箱上的那个时钟一样的图标：
然后选中窗体上的Timer1，将它的属性Interval 设置为1000，该属性决定动画演变的速度．
1000相当于1秒钟执行1次Timer1_Timer()事件，然后双击窗体上的Timer1，编写代码：
Private Sub Timer1_Timer()
Label1.Left = Label1.Left - 50
If Label1.Left <= -Label1.Width Then
Label1.Left = Me.Width
End If
End Sub
如果要提高速度，就减小属性Interval 的值．

Answer 2

这个用left属性控制比较麻烦 给你个简单的：
添加个 Timer1, Timer1.interval=100
添加个 Label1 里面添加些字符，比方说"一行字从右边移到左边"
再用 Label1 = " " & Label1加强下，这样效果好看点。

Private Sub Timer1_Timer()
Label1 = Right(Label1, Len(Label1) - 1) & Left(Label1, 1)
End Sub

Answer 3

第二句话错啦
if label1.left<=0 then label1.left=form1.width
我电脑没有vb ，直接写的，试试看对不

追问

弱弱地问一句，怎样修改已经保存过的工程的代码，我用VB6.0打开已保存的工程，只能运行，不知道应该怎样修改代码。。。