窗体中可以定义,只能定义成 Private ,在本窗体中使用 Private Type MyType a As Integer b As Integer End Type 模块中 可以定义成 Private ,在本模块中使用 Private Type MyType a As Integer b As Integer End Type 可以定义成 Public ,在任何地方都可以使用 Public Type MyType a As Integer b As Integer End Type 结构体定义以后就成为一种数据类型,和 Long等数据类型使用方法类似 Private Sub Form_Load() Dim x As MyType Dim y As MyType x.a = 1 x.b = 2 y = x 'VB 允许 结构体 像这样整体赋值 ReDim MyArray(1 To 10) As MyType