Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

String umwandeln...
Autor: jensnrw
Datum: 29.01.03 08:28
Hallo ! Ich habe mir ein Programm angeschaut, mit welchem ich jetzt folgendes Problem habe... dort wird erst die Tastatureingabe in einer beliebigen Textbox überprüft, da dort nur bestimmt Zeichen eingegeben werden dürfen... und zwar mit folgende Funktion: Public Function Tastatureingabe_pruefen%(EingabeSteuerelement As Control, TastenASCII As Integer) If TastenASCII > 31 And TastenASCII < 255 Then If TastenASCII = 44 Then 'Dezimalkomma wurde eingegeben If InStr(EingabeSteuerelement.Text, ".") = 0 Then TastenASCII = 46 'Falls noch kein Dezimalpunkt in der Zeichenkette vorhanden ist, 'Komma in Dezimalpunkt umwandeln Else TastenASCII = 0 End If ' Nur Zahlenwerte akzeptieren ElseIf InStr("1234567890.", Chr$(TastenASCII)) = 0 Then TastenASCII = 0 ElseIf InStr(EingabeSteuerelement.Text, ".") > 0 And TastenASCII = 46 Then TastenASCII = 0 'Dezimalpunkt darf nur einmal vorkommen End If End If Tastatureingabe_pruefen% = TastenASCII 'Werte zurückgeben End Function Dann wird der String in der Textbox mit der folgenden Funktion "umgewandelt"... da die Daten in "Single-Format" benötigt werden. Mit der folgenden Funktion: Sub PruefenUmwandeln(test) Dim X As String X = Left(test, 1) If X = "." Or X = "," Then test = "0" + test Y = InStr(1, test, ".", vbTextCompare) If Y <> 0 Then test = Left(test, Y - 1) + "," + Right(test, Len(test) - Y) End If End Sub Das Problem: Man kann nun logischerweise keine "MINUS-Werte" eingeben... selbst wenn in der ersten Funktion ein "-" erlaubt ist, kann der String ja durch die zweite Funktion nicht umgewandelt werden.... hat da jemand eine Idee, wie man das nun "abändern" muß, damit das geht !? Vielen Dank !

String umwandeln...	485	jensnrw	29.01.03 08:28
Re: String umwandeln...	308	Dieter	29.01.03 08:31
Re: String umwandeln...	310	jensnrw	29.01.03 09:33
Re: String umwandeln...	331	Dieter	29.01.03 09:48
	303	Liechte	29.01.03 09:56

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen