Zeichenumwandlung

29.12.2003

Das Darstellen von importierten Daten in gewünschter Form.

Beim Import von Daten liegen diese oftmals in einer Form oder Darstellung vor, die unerwünscht ist. Dabei sind natürlich die unterschiedlichsten Variationen denkbar.

Benutzen Sie die Funktionen, um die Darstellung importierter Daten in eine gewünschte Form zu bringen.

Das folgende Beispiel (siehe Abbildung 1) zeigt eine Tabelle mit importierten Daten an. Vor- und Nachname liegen nicht in der üblichen Schreibweise - erster Buchstabe groß und alle anderen Buchstaben klein - vor.

Erstellen Sie in einem solchen Fall eine benutzerdefinierte Funktion, die mit Hilfe eingebauter Access-Funktionen dieses Problem löst.

Public Function StandardString(ByVal InputString As String) As String '

Diese Funktion gibt eine Zeichenkette mit dem ersten Buchstaben groß ' und den
restlichen Buchstaben klein aus

Dim FirstLetter As String, RemainString As String

FirstLetter = Left(InputString, 1)
RemainString = Right(InputString, Len(InputString) - 1)
StandardString = Format(FirstLetter, ">") & Format(RemainString, "<")

End Function

Die beiden Variablen FirstLetter und RemainString teilen den übergebenen String InputString in den ersten Buchstaben und den Rest der Zeichenkette auf. FirstLetter wird mit Hilfe der Left-Funktion der erste Buchstaben der Zeichenkette zugewiesen, RemainString der Rest der Zeichenkette. Dabei kommen die Funktionen Right und Len zum Einsatz.

Anschließend werden die Buchstaben der beiden Teilstrings entsprechend umgewandelt und als Rückgabewert der aufrufenden Funktion übergeben. Eine solche Funktion können Sie anschließend in einer Abfrage verwenden, um in berechneten Feldern die umgewandelten Zeichenketten darzustellen.

Dienstleistungen

Als starker Partner an Ihrer Seite unterstützen wir Sie in folgenden Breichen:

Access-Programmierung

Benötigen Sie Unterstützung bei der Programmierung von Access-Anwendungen? Wir bieten die gesamte Bandbreite von der Access-Programmierung auf Stundenbasis bis zur Durchführung eines Software-Projektes als Auftragsarbeit an. Kontaktieren Sie uns für ein kostenloses Erstgespräch.

Software-Beratung

Haben Sie ein Software-Projekt und Sie wissen nicht, ob Access die richtige Plattform ist? Wir haben über 20 Jahre Erfahrung beim Erstellen von Windows-, Web und mobilen Anwendungen. Kontaktieren Sie uns für eine kostenlose Erstberatung.