return (loMethodInfo.DeclaringType <> GetType(FrameworkBaseClass))>
> ' If a method exists in a sub class. This is used when we negotiate with the Overrides method. Thus, the framework > ' may know if the Overrides method exists in the sub class. This is used in the DataEntry class. So, if the method > ' does not exist, we do not call it. And, if it exists, it allows us to validate, if necessary, before proceeding. > ' expO1 Originator > ' expC1 Name of the method > Public Function IsMethodExistInSubClass(ByVal toOriginator As Object, ByVal tcMethod As String) As Boolean > Dim llExist As Boolean = False > Dim loType As Type = Nothing > Dim loMethodInfo As System.Reflection.MethodInfo = Nothing > > ' Get a reference to the originator type > loType = toOriginator.GetType() > > ' Get a reference to the method > loMethodInfo = loType.GetMethod(tcMethod, System.Reflection.BindingFlags.Instance Or System.Reflection.BindingFlags.Public) > > ' If the method does not exist > If loMethodInfo Is Nothing Then > Return False > End If > > ' If the method exists in the sub class > If loMethodInfo.DeclaringType <> loType Then > llExist = True > End If > > Return llExist > End Function >Hmm. Don't think so. The type of toOriginator will be the that of the child class instance. You need to explicitly test the DeclaringType against the base (root) class