Find a Parent Control Recursively

Public Shared Function FindParentAsTabControl(ByRef startCntrl As Control) As Control
    Dim retCntrl As Control = Nothing
    If(startCntrl.Parent IsNot Nothing)
        If(TypeOf(startCntrl.Parent) is TabControl)
            retCntrl = startCntrl.Parent
        Else
            retCntrl = FindParentAsTabControl(startCntrl.Parent)
        End if
    End If
    Return(retCntrl)
End Function