vb.net高手进
我创建了一个结构如下：
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
public Structure person
Dim age As Integer
Dim sex As String
Dim name As String
End Structure
End Sub
就是这段代码他给我报了几个个错，一个是第一行的structure他说关键字作为标识符无效，第二个是end structure他说语句不能出现方法体内假定已经达到方法末尾。第三个就是end sub前面必须是匹配的sub，这个应该怎么解决啊。
参考答案:在模块或类级使用，以声明结构和定义该结构成员的特征。
[ <attrlist> ] [{ Public | Protected | Friend | Protected Friend | Private }] [ Shadows ]
Structure name
[ Implements interfacenames ]
variabledeclarations
[ proceduredeclarations ]
End Structure
各部分说明
attrlist
可选项。属性列表，应用于此结构。多个属性以逗号分隔。
Public
可选项。用 Public 关键字声明的结构具有公共访问权限。对于公共结构的可访问性没有任何限制。
Protected
可选项。用 Protected 关键字声明的结构具有受保护的访问权限。仅可以从其自己的类或派生类中访问它们。只能对类成员指定受保护的访问。它不是友元访问的超集。
Friend
可选项。用 Friend 关键字声明的结构具有友元访问权限。可从它们的声明上下文内和同一程序中的任何位置访问它们。
Protected Friend
可选项。使用 Protected Friend 修饰符声明的结构同时具有受保护访问权限和友元访问权限。它们可由同一程序中的代码和派生类中的代码使用。只能对类成员指定 Protected friend 访问权限。
Private
可选项。用 Private 修饰符声明的结构具有私有访问权限。只可从它们的声明上下文（包括从过程等任何嵌套类型的成员）中来访问它们。
Shadows
可选项。指示该结构隐藏基类中的同名编程元素或重载元素集。可以用其他任何类型的元素来隐藏任何类型的被声明元素。被隐藏的元素在隐藏它的派生类内不可用，除非隐藏元素不可访问，例如，如果它为 Private。
name
必选项。结构名。必须是有效的 Visual Basic 标识符。
Implements
可选项。指示此结构实现一个或多个接口成员。
interfacenames
如果使用 Implements 语句则需要。由此结构实现的接口名称。如果使用 Implements 语句，则必须直接跟随 Structure 语句，并且必须实现由用户指定的所有接口的所有成员。
variabledeclarations
必选项。一个或多个 Dim、Friend、Private 或 Public 语句，声明作为结构的数据成员的变量和事件。这些声明与在结构外一样，遵循相同的规则。
也可以在结构中定义常数和属性，但必须至少声明一个非共享变量或事件。
proceduredeclarations
可选项。作为结构的方法成员的零个或多个 Function、Property 或 Sub 过程的声明。这些声明与在结构外一样，遵循相同的规则。
attrlist 部分中的每个属性具有以下语法和组成部分：
attrname [({ attrargs | attrinit })]
attrlist 部分
attrname
必选项。特性名。必须是有效的 Visual Basic 标识符。
attrargs
可选项。该特性的定位参数列表。多个参数以逗号分隔。
attrinit
可选项。该特性的字段或属性初始值设定项列表。多个初始值设定项以逗号分隔。
备注
Structure 语句只能在模块、命名空间或文件级出现。这就是说可以在源文件或模块、接口或类内部声明结构，但不能在过程内部进行声明。也可以在一个结构中定义另一个结构，但不能通过外部结构访问内部结构的成员。而是必须声明一个内部结构的数据类型变量。
可以从声明结构的模块或类内的任何位置访问它们。默认情况下，结构为 Friend。若要更详细地指定可访问性，请在 Structure 语句中包括 Public、Friend、Protected Friend 或 Private。
必须声明结构的每一数据成员。这意味着 variabledeclarations 部分中的每一语句必须使用 Dim、Friend、Private 或 Public。由于无法从结构中继承，因此结构成员不能是 Protected 或 Protected Friend。但结构本身可以是 Protected 或 Protected Friend。
如果 Option Strict 是 On，则在每一个成员声明中还必须包含 As 子句。用 Dim 声明的成员默认为 Public 访问，未用 As 子句声明的成员默认为 Object 数据类型。
在结构中必须至少定义一个非共享变量或事件。在结构中不能只包含常数、属性和过程，即使某些成员是非共享的。
结构成员的范围是整个结构。
不能将结构的任何数据成员的值初始化成其声明的一部分。必须通过结构上参数化的构造函数初始化数据成员，或者在创建了该结构的实例后将值赋给该成员。
结构支持的许多功能与类支持的一样。例如，结构可以拥有属性和方法，可以实现接口，也可以拥有参数化的构造函数。但是，在某些地方（例如继承、声明和用法）结构和类之间存在着重大的差异。
示例
本示例使用 Structure 语句定义雇员的一系列相关数据。它展示了 Public、Friend 和 Private 成员的用法，从而反映数据项的敏感性。它还将显示过程、属性和事件成员。
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 program.
Friend EmployeeNumber As Integer
Friend WorkPhone As Long
' Private members, accessible only within the structure itself.
Private HomePhone As Long
Private Level As Integer
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
' Property member to return employee's eligibility.
Friend ReadOnly Property Eligible() As Boolean
Get
Return Level >= 25
End Get
End Property
' Event member, raised when business phone number has changed.
Public Event ChangedWorkPhone(ByVal NewPhone As Long)
End Structure