basTgDb.bas

Attribute VB_Name = "basTgDb"
Public Type typeTgDbNodeLeaf
    This As String
    Leaf As Boolean
End Type
Public Type typeTgDbNodeHiLo
    Hi As Long
    Lo As Long
End Type
Public Type typeTgDbNodeUpDn
    Parent As Long
    Child As Long
End Type