VB.net Метка со скользящим текстом слева направо - PullRequest
1 голос
/ 06 марта 2019

Текст, который я хочу показать на своем ярлыке, довольно длинный, поэтому я подумал о том, чтобы сделать текстовый вид слайда внутри ярлыка слева направо.

Возможно ли это в VB.net?

1 Ответ

0 голосов
/ 06 марта 2019

можно;

Public Class Form1

    Dim BigStr As String = "         this is a very big string, and I want to slide it ya ya ya          "
    Dim Pointer As Integer = 0

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

    End Sub

    Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
        Label1.Text = BigStr.Substring(Pointer, 5)
        Pointer = Pointer + 1
        Pointer = Pointer Mod (BigStr.Length - 6)
    End Sub
End Class

Не забудьте включить таймер

...