TIMER属性问题!(请教各位高手)

Question

1
 在窗体上有一文字"祝你学好VB"要使它向右移100缇
INTERVAL属性设置间隔时间为1秒!!(用WITH语句)
2
从左往右循环移动!

Answer 1

2.Private Sub Form_Load()
Timer1.Interval = 200
Label1.AutoSize = True
Label1.Caption = "×£ÄãѧºÃVB"
End SubPrivate Sub Timer1_Timer()
If Me.Width - Label1.Width < Label1.Left Then
    Label1.Left = 0
Else
    Label1.Left = Label1.Left + 100
End If
End Sub

Answer 2

'不好意思,有乱码
Private Sub Form_Load()
Timer1.Interval = 200
Label1.AutoSize = True
Label1.Caption = 祝你学好VB"
End SubPrivate Sub Timer1_Timer()
If Me.Width - Label1.Width < Label1.Left Then
    Label1.Left = 0
Else
    Label1.Left = Label1.Left + 100
End If
End Sub