別件の内容ですが、一行で行けました。

>> Public Function FindControl(ByVal hParent As Control, ByVal stName As String) As Control
>上記の再帰探索は、
>　Return hParent.Controls.Find(stName, searchAllChildren:=True).FirstOrDefault()
>の一行だけで済むかも。

    Public Function FindControl(ByVal hParent As Control, ByVal stName As String) As Control

        Return hParent.Controls.Find(stName, searchAllChildren:=True).FirstOrDefault()

    End Function

ですね！