Scrolling Text in einem Steuerelement mit Visual Basic.NET ist nicht so kompliziert, wie Sie vielleicht denken. Damit Sie Text scrollen , Sie gehen zu müssen, um einen Code-Abschnitt eine Anzahl von Zeiten auszuführen. Der beste Weg , dies zu tun , ist mit einem "Timer "-Steuerung in Ihrer Anwendung. Sie können einen Timer , um Ihren Code ausführen , bis der Timer gestoppt. Der "Timer "-Steuerung ist für den Benutzer unsichtbar , und es ist allgemein für die Hintergrundverarbeitung verwendet . Things You
Microsoft Visual Studio
brauchen anzeigen Weitere Anweisungen
1
Starten Sie Microsoft Visual Studio , klicken Sie auf "Neues Projekt" aus dem linken Bereich des Bildschirm Ihres Computers , und erweitern " Visual Basic " unter " Installierte Vorlagen . " Klicken Sie "Windows " und doppelklicken Sie auf "Windows Forms Application" aus der Mitte der Dialogfenster , um ein neues Projekt zu erstellen.
2
Doppelklicken Sie auf " Timer" , um einen Timer zu Ihrem Formular hinzufügen . Doppelklicken Sie auf " label", um ein neues Label zu Ihrem Formular hinzuzufügen. Fügen Sie eine Schaltfläche mit der gleichen Technik . . Doppelklicken Sie auf " Button1 ", um eine Click-Ereignis für diese Schaltfläche zu erstellen
3
Kopieren Sie den folgenden Code in der Schaltfläche Click-Ereignis :
Index As Integer = 0 To UBound ( TextString )
Dim workedString As String = ""
workedString = scrollText.Substring (index) & "" & scrollText.Substring (0 , index)
< p> TextString (index) = workedString
Weiter
Timer1.Interval = 75
Timer1.Enabled = True
Timer1.Start () < br >
4
Schalter zurück zur Design-Ansicht und doppelklicken Sie auf " Timer1 " einen tick Ereignis für den Timer zu erstellen bilden . Fügen Sie den folgenden Code innerhalb der Veranstaltung:
xPos + = 1
Dim tmrStr As String
tmrStr = TextString ( xPos )
Label1.Text = tmrStr
Wenn xPos = UBound ( TextString ) Dann xPos = -1
5
Presse "F5" , um das Programm und klicken Sie auf " Button1 " , um das Scrollen von Text über die Beschriftung angezeigt .