Freigeben über


Strukturen und andere Programmierelemente (Visual Basic)

Sie können Strukturen gemeinsam mit Arrays, Objekten und Prozeduren sowie miteinander verwenden. Die Interaktionen verwenden dieselbe Syntax, die diese Elemente einzeln verwenden.

Tipp

Es ist nicht möglich, Strukturelemente in der Strukturdeklaration zu initialisieren. Sie können nur denjenigen Elementen einer Variablen Werte zuweisen, die als Strukturtyp deklariert wurden.

Strukturen und Arrays

Ein Array kann innerhalb einer Struktur ein oder mehrere Elemente darstellen. Dies wird anhand des folgenden Beispiels veranschaulicht:

Public Structure systemInfo
    Public cPU As String
    Public memory As Long
    Public diskDrives() As String
    Public purchaseDate As Date
End Structure 

Der Zugriff auf die Werte eines Arrays innerhalb einer Struktur erfolgt wie der Zugriff auf die Eigenschaft eines Objekts. Dies wird anhand des folgenden Beispiels veranschaulicht:

Dim mySystem As systemInfo
ReDim mySystem.diskDrives(3)
mySystem.diskDrives(0) = "1.44 MB"

Sie können auch ein Array von Strukturen deklarieren. Dies wird anhand des folgenden Beispiels veranschaulicht:

Dim allSystems(100) As systemInfo

Für den Zugriff auf die Komponenten dieser Datenarchitektur gelten die gleichen Regeln. Dies wird anhand des folgenden Beispiels veranschaulicht:

ReDim allSystems(5).diskDrives(3)
allSystems(5).CPU = "386SX"
allSystems(5).diskDrives(2) = "100M SCSI"

Strukturen und Objekte

Ein Objekt kann innerhalb einer Struktur ein oder mehrere Elemente darstellen. Dies wird anhand des folgenden Beispiels veranschaulicht:

Protected Structure userInput
    Public userName As String
    Public inputForm As System.Windows.Forms.Form
    Public userFileNumber As Integer
End Structure

Anstelle von Object sollten Sie in einer solchen Deklaration ein bestimmtes Objekt verwenden.

Strukturen und Prozeduren

Sie können eine Struktur als Prozedurargument übergeben. Dies wird anhand des folgenden Beispiels veranschaulicht:

Public currentCPUName As String = "700MHz Pentium compatible"
Public currentMemorySize As Long = 256
Public Sub fillSystem(ByRef someSystem As systemInfo)
    someSystem.cPU = currentCPUName
    someSystem.memory = currentMemorySize
    someSystem.purchaseDate = Now
End Sub

Im vorangegangenen Beispiel wird die Struktur durch einen Verweis übergeben, wodurch die Prozedur deren Elemente so verändern kann, dass die Änderungen im Aufrufcode wirksam werden. Wenn Sie eine Struktur vor solchen Änderungen schützen möchten, übergeben Sie sie durch einen Wert.

Sie können auch eine Struktur von einer Function-Prozedur zurückgeben. Dies wird anhand des folgenden Beispiels veranschaulicht:

Dim allSystems(100) As systemInfo
Function findByDate(ByVal searchDate As Date) As systemInfo
    Dim i As Integer
    For i = 1 To 100
        If allSystems(i).purchaseDate = searchDate Then Return allSystems(i)
    Next i
   ' Process error: system with desired purchase date not found.
End Function

Strukturen innerhalb von Strukturen

Strukturen können andere Strukturen enthalten. Dies wird anhand des folgenden Beispiels veranschaulicht:

Public Structure driveInfo
    Public type As String
    Public size As Long
End Structure
Public Structure systemInfo
    Public cPU As String
    Public memory As Long
    Public diskDrives() As driveInfo
    Public purchaseDate As Date
End Structure
Dim allSystems(100) As systemInfo
ReDim allSystems(1).diskDrives(3)
allSystems(1).diskDrives(0).type = "Floppy"

Mit diesem Verfahren können Sie eine in einem Modul definierte Struktur in einer Struktur kapseln, die in einem anderen Modul definiert ist.

Strukturen können beliebig viele andere Strukturen enthalten.

Siehe auch

Aufgaben

Problembehandlung bei Datentypen (Visual Basic)

Gewusst wie: Deklarieren einer Struktur (Visual Basic)

Referenz

Structure-Anweisung

Konzepte

Datentypen in Visual Basic

Zusammengesetzte Datentypen (Visual Basic)

Strukturvariablen (Visual Basic)

Strukturen und Klassen (Visual Basic)

Weitere Ressourcen

Elementare Datentypen (Visual Basic)

Datentypimplementierung (Visual Basic)

Strukturen (Visual Basic)