自定义类型允许用户建立结构类型，缺省类型允许用户定义缺省类型。格式：

以下是引用片段：

Private Type FypeDemo
　　(成员名1) As (类型)
　　<成员名2) As <类型)
　　End Type

功能：在全局模块中或在窗体中定义结构类型。

说明：

(1)结构类型所占存储空间是其中所有成员的长度之和。

(2)如果有Private可选项，是在窗体中定义的结构体类型。

定义结构变量：

格式：

以下是引用片段：

Dim I Static <结构变量> As rypeDemo

引用结构变量的成员：
　　格式：结构变量名.成员名
　　例如：

以下是引用片段：
　　Type TypeDemo '在全局模块中定义结构类型。
　　N1 As Double
　　N2 As Integer
　　N3 As String’k l 0
　　End Type
　　Static X As TypeDemo

引用变量的成员：

以下是引用片段：
　　X.N1
　　X.N2
　　X.N3
　　定义了之后就可以像上面那样引用了，使用的时候和使用控件感觉很像！