Declarar Control Menu en clase

[dadabit]

Hola, tengo un problema con esto

Código:

Public Sub ConstruyeMenu(ByVal menu As Menu, ByVal Usuario As Integer)
        Dim dtMenuItems As New DataTable
        Dim MyConn1 As New SqlConnection("packet size=4096;user id=admin;data source=DIR2;PWD=admi_sig99;persist security info=False;initial catalog=Contabilidad")
        Dim daMenu As New SqlDataAdapter("dbo.ObtenerOpcionesMenu", MyConn1)
        daMenu.SelectCommand.CommandType = CommandType.StoredProcedure
        daMenu.SelectCommand.Parameters.Add("@usuario", SqlDbType.Int)
        daMenu.SelectCommand.Parameters("@usuario").Value = Usuario

        'llenamos el datatable
        daMenu.Fill(dtMenuItems)
        'recorremos el datatable para agregar los elementos de que estaran en la cabecera del menu.
        For Each drMenuItem As Data.DataRow In dtMenuItems.Rows
            'esta condicion indica q son elementos padre.
            If drMenuItem("MenuId").Equals(drMenuItem("PadreId")) Then
                Dim mnuMenuItem As New MenuItem
                mnuMenuItem.Value = drMenuItem("MenuId").ToString
                mnuMenuItem.Text = drMenuItem("Descripcion").ToString
                mnuMenuItem.ImageUrl = drMenuItem("Icono").ToString
                mnuMenuItem.NavigateUrl = drMenuItem("Url").ToString
                'agregamos el Item al menu
                menu.Items.Add(mnuMenuItem)
                'hacemos un llamado al metodo recursivo encargado de generar el arbol del menu.
                AddMenuItem(mnuMenuItem, dtMenuItems)
            End If
        Next
    End Sub

Esto me cargaria un menu. Me pone un error de que Menu no tiene la propiedad Items.Add....No se si se declaró bien el contro Menu

Ya he hecho esto en un web form, pero se me ocurre que puede ser una clase y mandar llamar el metodo para llenar el Menu...

o bien, ¿se puede declarar el control Menu en una clase????

Gracias