Public Sub AddUnitSub( _
ByRef vCode As String _
, ByRef vName As String _
, ByRef vConstant As Double _
, ByRef vDefinition As String _
, ByRef vCategory As String _
)Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.