Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Textfeld automatisch weiter scrollen

288 views
Skip to first unread message

Franz Mayer

unread,
Feb 27, 2003, 9:36:32 AM2/27/03
to
Hallo,

habe ein kleines Problem mit einem Textfeld. Ich füttere ein
mehrzeiliges Textfeld per VBA mit Text. Nun will ich, dass das Textfeld
automatisch immer das Ende des Textes zeigt - also automatisch
mitscrollt.

Gibt's da eine Einstellung oder muss ich sowas programmieren?? Oder
geht's gar nich in Access 2000?

Danke & Gruß Franz

Karl Donaubauer

unread,
Feb 27, 2003, 9:55:33 AM2/27/03
to
Franz Mayer schrieb:


Kommt etwas auf den Code bzw. die Vorgangsweise beim
Füllen an. Grundsätzlich s.
Access-FAQ 4.24 Cursor/Markierung positionieren

Evtl. musst du aber eher mit der Text-Eigenschaft arbeiten statt
mit Value.

--
HTH
Karl
********* Ich beantworte keine Access-Fragen per Email. *********
Access-FAQ: http://www.donkarl.com
Datenbankprofis: http://www.dbdev.org

Henry Habermacher [MVP Access]

unread,
Mar 2, 2003, 9:10:06 AM3/2/03
to
Hallo Franz

Doch das geht schon.
Setz den Focus auf das Feld und dann den Cursor innerhalb des Feldes an die
letzte Position, also:

Me!TextFeld.SetFocus
Me!TextFeld.SelStart = Len(Me!TextFeld.Text)

HTH
Henry


--
Keine E-Mails auf Postings in NGs senden!
Don't send e-mails to postings in newsgroups!
KB: http://support.microsoft.com/default.aspx
FAQ: http://www.donkarl.com/FAQ/FAQStart.htm
MVP: http://mvp.support.microsoft.com
OH: Online Hilfe von Microsoft Access (Taste F1)

Franz Mayer

unread,
Mar 5, 2003, 1:59:36 AM3/5/03
to
Hallo,

habe ein weiteres kleines Problem mit meinem Textfeld. Ich wuerde gerne
eine neue Zeile einfügen, aber mit chr(13) funktz es nicht? Kann ich
eine neue Zeile einfügen?

Danke, Gruß Franz

"Henry Habermacher [MVP Access]" schrieb:

Ralf Homeier

unread,
Mar 5, 2003, 9:21:12 AM3/5/03
to
Hallo Franz,

versuch mal vbcrlf

Hier mal ein Ausschnitt aus meinem Textfeld scrollen:

das Formular mit dem Textfeld anzeigen, und dann

Call ZeileAnhängen("Dein Text ")

Function ZeileAnhängen(ByVal neueMeldung As String)
Forms!DEINFORMULAR!TEXTFELD =
Forms!DEINFORMULAR!TEXTFELD & neueMeldung & vbCrLf
Forms!DEINFORMULAR!TEXTFELD.SetFocus
Forms!DEINFORMULAR!TEXTFELD.SelStart =
Len(Forms!DEINFORMULAR!TEXTFELD)
End Function

Hab ich auch aus dieser NG.

Ralf

"Franz Mayer" <d5...@zv.fhg.de> schrieb im Newsbeitrag
news:3E65A058...@zv.fhg.de...

0 new messages