必须声明结构的每一数据成员。这意味着 variabledeclarations 部分中的每一语句必须使用 Dim、Friend、Private 或 Public。如果 Option Strict 是 On,则在每一语句中还必须包含 As 子句。用 Dim 声明的成员默认为 Public 访问,未用 As 子句声明的成员默认为 Object 数据类型。
Public Structure Employee
' Public members, accessible throughout declaration region.
Public FirstName As String
Public MiddleName As String
Public LastName As String
' Friend members, accessible anywhere within the same assembly.
Friend EmployeeNumber As Integer
Friend BusinessPhone As Long
' Private members, accessible only within the structure itself.
Private HomePhone As Long
Private Salary As Double
Private Bonus As Double
' Procedure member, which can access structure's private members.
Friend Sub CalculateBonus(ByVal Rate As Single)
Bonus = Salary * CDbl(Rate)
End Sub
End Structure