Attribute VB_Name = "WEASEL1"
Option Explicit

Type WeaselType
 name As String * 32
 COLOR As String * 12
 weight As Integer
 length As Integer
 birthdate As Double
End Type

Global Const weasel_Reclen = 56