>As long as you are sure it's safe.
>If someone can sub-class your base class there's nothing to stop them deriving from the derived class - in which case your code would break. If your class is directly derived from Object then you could identify it like this:
Dim parent As Type = t ' where t is type of actual class
>While True
> If parent.BaseType = GetType([Object]) Then
> Exit While
> Else
> parent = parent.BaseType
> End If
>End While
>
>'Parent is now your base class
>
>
>But at that point it probably makes as much sense to pass in the name of the class anyway....
As this is at the framework level, I would like to make it more bullet proof. Also, the framework as some sub classes of the DataEntry class itself. So, I need to fine tune here. Could you elaborate more on the If condition in here which will exit the While? I understand it is a comparism to know if we have reached the top level. So, for as long as the While goes, we climb the chain. But, what does Object represent in that line?