几种先进的网络技术:vb 的问题 ，会者请进

来源：百度文库 编辑：查人人中国名人网 时间：2024/04/29 03:14:12
Private Sub Form_Load()
Timer1.Enabled = False
End Sub
Private Sub Command1_Click()
Timer1.Enabled = True
End Sub
Private Sub Command2_Click()
Timer1.Enabled = False
End Sub

Private Sub Timer1_Timer()
If Label1.Left < Width Then
Label1.Left = Label1.Left + 20
Else
Label1.Left = 0
End If
End Sub
给我解释一下空格下面的语句，我看不懂，呵呵，刚学！

Private Sub Timer1_Timer() ‘计时器事件！时间到了触发
If Label1.Left < Width Then 当标签的左边距小于width值的时候
Label1.Left = Label1.Left + 20 label1控件向右移20个单位
Else 否则
Label1.Left = 0 label1控件顶到容器左边
End If
End Sub

label控件每次timer时右移，移到width是回到最左边！

vb 的问题 ，会者请进 会vb的请进 会vb的请进 会VB的请进 会VB的请进，帮帮我做一题。 VB中的问题，会VB的帮忙！ 会VB请进~ vb高手请进，问一个有关vb的问题。 急!VB高手请进,有关VB代码的问题!!! 关于VB的问题。高手请进