| VB-Homepage Tipp 285 |
| Benutzerdefinierte Typen definieren und nutzen |
| Variablen, also Objekte denen Sie Werte zuweisen,
müssen immer einem bestimmten Typ angehören. Dieses wird über die Dim Anweisung erledigt. Dim MeineVaraible as String (definiert den Variablentyp und damit den Inhalt als Zeichenkette) Dim MeineVariable as Integer (definiert den Variablentyp und damit den Inhalt als numerischen Wert) Wenn Sie sich zum Beispiel schon die API Funktionen zu nutze gemacht haben, sind Sie sicher auch auf ganze andere Typdefinitionen gestoßen. Type POINTAPI x As Long y As Long End Type Gearbeitet wird dann aber nicht mit POINTAPI sondern mit einer selbst definierten Variable, die man als entsprechenden Typ definiert. Dim MeinPointApi As POINTAPI MeinPointApi.x = ..... MeinPointApi.y = ..... Das Ganze wollen wir nun für unseren eigenen Typ nutzen. Als Beispiel wäre uns ein Typ recht, der sowohl einen Namen, einen Vornamen und eine Telefonnummer speichern kann. Type MeinEignerTyp Name As String Vorname As String Telefon As String End Typ Wenn Sie es im Allgemein/Deklarationen Abschnitt eines Moduls angeben, reicht diese Angabe. Nutzen Sie die Form, müssen Sie Private Type MeinEignerTyp angeben. Definieren Sie dann die Variable, die diesem Typ entsprechen soll. Dim Adresse As MeinEignerTyp .. und nun holen wir uns die Information z.Bsp. auslesen von Textfeldern Adresse.Name = Text1.Text Adresse.Vorname = Text2.Text Adresse.Telefon = Text3.Text und abfragen geht genauso gut. Msgbox Adresse.Vorname & " " & Adresse.Name & " = " & Adresse.Telefon Möchten Sie den Variablen auch noch die Anzahl an Zeichen zuweisen, können Sie dies wie folgt. Type MeinEignerTyp |
| Tipp-Download |
| Quelle : |
 |