In diesem Beispiel wird die Type-Anweisung verwendet, um einen benutzerdefinierten Datentyp zu definieren. Die Type-Anweisung wird nur auf Modulebene verwendet. Wenn eine Type-Anweisung in einem Klassenmodul angezeigt wird, muß ihr das Schlüsselwort Private vorangestellt werden.
Type Angestellter ' Benutzerdefinierten Typ erstellen. PersNr As Integer ' Elemente des Typs definieren. Name As String * 20 Adresse As String * 30 Telefon As Long Einstellungsdatum As Date End Type Sub CreateRecord() Dim Datensatz1 As Angestellter ' Variable deklarieren. ' Die Zuweisung zur Variablen Angestellter muß in einer Prozedur ' erfolgen. Datensatz1.PersNr = 12003 ' Einem Element wird ein Wert ' zugewiesen. End Sub