Zurück zu Parametern
Datentypen
Selbst wenn Sie nur eine "normale" Funktion mit einem einzigen Rückgabewert schreiben, können Sie darin mehrere Daten zusammenfassen. Dazu brauchen Sie einen neuen Datentyp, den Sie wie im folgenden Listing am Anfang eines Moduls deklarieren:
Type Adresse Vorname As String Nachname As String Geburtstag As Date AnzahlKinder As Integer End Type Function SuchePerson(lngPersonalNr As Long) As Adresse 'hier könnte jetzt ein Datensatz aus einer Datenbank 'ermittelt werden, zur Vereinfachung nur Pseudo-Daten... With SuchePerson .Vorname = "Lorenz" .Nachname = "Hölscher" .AnzahlKinder = 2 .Geburtstag = "24.11.1960" End With End Function Sub TesteSuchen() Dim Ergebnis As Adresse Ergebnis = SuchePerson(1234) MsgBox Ergebnis.Vorname & " " & Ergebnis.Nachname & " hat am " & Ergebnis.Geburtstag & " Geburtstag!" End Sub
Der neue Datentyp Adresse ist ein zusammengesetzter Datentyp aus verschiedenen Variablen, auch solchen unterschiedlicher Datentypen.
Diese Seite ist für Mitglieder von akademie.de reserviert.
Möchten Sie die Mitgliedschaft 14 Tage kostenlos testen und den Beitrag komplett lesen?
Oder möchten Sie zunächst mehr über diesen Beitrag erfahren und die Leseproben sehen?
Ich bin bereits Mitglied