vb自定义变量有多个属性有什么方法清空所有属性的值

vb自定义变量有多个属性有什么方法清空所有属性的值

定义了一个自定义变量，里面有多个属性。请问有什么方法清空所有属性的值。是全局变量。
Visual Basic code?123456789101112 Public Type 单据     ID As Long    单据号 As String    单据类别 As Integer    操作员 As String    员工工号 As Integer    员工姓名 As String    病人姓名 As String    病人年龄 As Integer    病人性别 As String    药品信息 As StringEnd Type
Sub Clear(t As 单据)     Dim tEmpty As 单据     t = tEmpty End Sub