Rubrik: Variablen/Strings · String-Operationen | VB-Versionen: VB4, VB5, VB6 | 17.04.03 |
vbCr vereinfacht Mehrere vbCr-Zeichen verkürzt benutzen | ||
Autor: Tobias König | Bewertung: | Views: 14.161 |
ohne Homepage | System: Win9x, WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11 | Beispielprojekt auf CD |
Mein Problem war folgendes:
In einer UserForm mit einem Label wollte ich eine kleine Hilfe schreiben (ohne auf txt-Dateien etc.) zurückzugreifen. Nun bestand aber das Problem, dass ich auch Leerzeilen einfügen wollte - und nicht ganz wenige, damit es auch übersichtlich bleibt.
Also:
Text = "..." & vbCr & vbCr & ...
Nein, das kanns nicht sein; immer wieder mehrfach das gleiche schreiben...
Also neue Version:
Text = "..." & NZ(2) & "..."
Dazu gehört natürlich jetzt folgende neue Funktion:
Public Function NZ(ByVal Anz As Integer) NZ = String$(Anz, vbCr) End Function
Klein - aber fein
Nun kann ich öfters Mehrzeilen-Umbrüche gestalten, ohne dass diese viel Platz wegnehmen. Zudem sind diese jetzt so flexibel, dass ich nur bei NZ(x) die Zahl ändern muss - und schon stimmt alles wieder.