VB - Homepage Tipp 208
PCASE (Textkapitälchen), die versteckte Funktion
UCase (Uppercase) = wandelt Strings in Großbuchstaben LCase (Lowercase) = wandelt Strings in Kleinbuchstaben Ich denke mit dem obig stehendem habe ich Ihnen nichts neues erzählt, aber wußten Sie, das es eine dritte Funktion gibt ? PCase (Propercase) = in übergebenen Strings werden alle Anfangsbuchstaben in Großbuchstaben umgewandelt. ( sogenannte Kapitälchen ) Natürlich geht es auch, wie in Tipp Kapitälchen setzen beschrieben, denn damals war mir diese Funktion auch nicht bekannt. Aber nun zu einem Demoprojekt. 1. Öffnen Sie ein neues Projekt und fügen Sie einen Commandbutton (Command1) und eine Textbox (Text1) ein. 2. Außerdem brauchen wir die PCase Funktion. Private Function PCase(ByVal Expression As String) As String PCase = StrConv(Expression, vbProperCase) End Function 3. Und dem Commandbutton geben Sie in unter Command1_Click folgendes mit MsgBox PCase(Text1) 4. Wenn Sie nun Ihr Programm starten, in die Textbox Ihren Testtext eingeben und den Button anklicken, dann werden alle Anfangsbuchstaben in Großbuchstaben in der Msgbox dargestellt.
Tipp-Download
Quelle : Toni Fischbacher / http://home.t-online.de/home/08065819-0001
Hat Ihnen dieser Tipp geholfen?