Dim mpContentPlaceHolder As ContentPlaceHolder
        Dim vmenu As Menu
        mpContentPlaceHolder = _
            CType(Master.FindControl("page_content"),  _
            ContentPlaceHolder)
        If Not mpContentPlaceHolder Is Nothing Then
            vmenu = CType(mpContentPlaceHolder. _
                FindControl("Menu2"), Menu)
            If Not vmenu Is Nothing Then
 
            End If
        End If

dim vMenu as Menu = master.findcontrol("Menu2")
. . .