VERSION 1.0 CLASS BEGIN MultiUse = -1 'True END Attribute VB_Name = "TermItem" Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = False Attribute VB_Exposed = False Option Explicit Public name_ As String Public definition_ As String Public source_ As String Property Get Basic() As Boolean Basic = definition_ = "" End Property