Wie man eine Laufschrift Text Box zu Microsoft Access hinzufügen

Mitglieder-Login

InformationenMicrosoft Access

Wie Textdatei Daten an MS Excel -Fo… Microsoft Excel ist ein beliebtes Tabellenkalkulation , die in die Microsoft Office-Suite integriert
Wie auf den Winkel im Uhrzeigersinn… Microsoft Excel Arbeitsblätter zunehmend komplex, wie Sie das Dokument zu bauen. Bei der Verwendung
Wie zum Einbetten von IF-Anweisunge… Die IF-Anweisung eine leistungsstarke Funktion, die Microsoft Excel , wenn eine Bedingung geben Sie
Jeder in der Wirtschaft weiß, dass… Wie man eine Zweite Y -Achse zu einem Diagramm in Microsoft Excel hinzufügen . Aber ein Blick auf Ze

Software

HOME

* Computer Wissen >> Software >> Microsoft Access >> .

Wie man eine Laufschrift Text Box zu Microsoft Access hinzufügen

eine Laufschrift mit einem Textfeld-Steuerelement , um schnell fangen die Aufmerksamkeit eines Benutzers , wenn Sie Ihre Microsoft Access-Anwendung . In Access können Sie Visual Basic für Applikationen ( VBA) verwenden, um den Prozess der Lauftext auf ein Steuerelement zu automatisieren. VBA ist eine Programmiersprache verwendet, um Microsoft Office-Anwendungen zu erweitern. Benutzen Sie den " Form.Timer " Ereignis, um eine Sub-Prozedur , die kontinuierlich aktualisiert werden , wird der Inhalt im Textfeld ausführen . Anleitung
1

Klicken Sie auf " Erstellen " und klicken Sie "Form Design" , eine neue Form zu schaffen. Klicken Sie auf " Text Box " auf der "Controls" aus, und klicken Sie auf die Form , um ein neues Textfeld -Steuerelement hinzufügen . Der rechten Maustaste auf das Textfeld, und klicken Sie auf " Eigenschaften" , um das Fenster "Property Blatt . " Klicken Sie auf die Registerkarte "Format" , und stellen Sie die "Text ausrichten " -Eigenschaft auf " Richtig. " Klicken Sie auf die Registerkarte "Weitere" , und geben Sie " txtMarqee " neben " Name".
2

rechten Maustaste auf die Form , klicken Sie auf " Erstellen Ereignis ", und doppelklicken Sie auf " Code-Generator " zu starten die VBA -Editor-Fenster . Drücken Sie "Strg" und "A" , um alle Standard-Code zu wählen, und drücken Sie auf " Löschen", um Code zu entfernen .
3

Kopieren Sie den folgenden Code, um globale Variablen Sie verwenden hinzufügen in Ihrem Code :

Dim textStr As String Dim

padstr As String Dim

txtScroll As String Dim

txtLength As Integer

Dim iLength As Integer Dim

iPos As Integer Dim

iView As Integer Dim

Irem As Integer
4

Fügen Sie den folgenden Code zu definieren der Text, der durch das Textfeld-Steuerelement scrollen wird :

private Sub Form_Load ()

txtMarqee.SetFocus

txtMarqee.Text = ""

textStr = " Wie man eine Laufschrift Text Box zu Microsoft Access Add"

padstr = ""

txtScroll = textStr & padstr

txtLength = Len ( txtScroll )

iLength = Len ( padstr )

Me.TimerInterval = 500

iPos = 1

iView = 1

End Sub

5

erstellen Sub-Prozedur , die die " movetext " Sub-Prozedur aufruft :

private Sub Form_Timer ()

movetext

End Sub