vb小问题，谢谢。为什么时钟控件中s=0怎样使初始值s=1

Question

Private Sub Form_Load()
Dim s As Integer
s = 1
End Sub

Private Sub Timer1_Timer()
If Me.Left < 0 Or Me.Left > Screen.Width - Me.Width Then s = -1 * s
Me.Left = Me.Left + 100 * s
End Sub

Answer 1

将dim s as integer换成private s as integer写在form_load的上面，也就是外面，作为全局变量。