Question

你好，请教一下vb.net中想实现标签自动从左到右移动如何实现，我是新手

你好，请教一下vb.net中想实现标签自动从左到右移动如何实现，我是新手，方便的话教一下全流程！谢谢！

Answer 1

见下面代码，放置定时器，按钮，标签各一个

Public Class Form1

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick '定时器
        If Label1.Right < Me.Width Then
            Label1.Left += 10'移动距离
        Else
            Label1.Left = 0
        End If
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click '开启或者关闭定时器
        Timer1.Interval = 1000 '1秒
        If Timer1.Enabled = False Then
            Timer1.Start() '开定时器
        Else
            Timer1.Stop() '关定时器
        End If
    End Sub
End Class