[RESOLVED] Remove item from menu and add code to Dynamic menu items

[RS_Arm]

Hi.
I build my menu dynamically from a recordset.

While Not listTypes.EOF               
    Load mnufiles(mnufiles.UBound + 1)
    With mnufiles(mnufiles.UBound)
        .Caption = listTypes.Fields(1) 
        .Enabled = True
        .Visible = True
        .Checked = True
    End With
    listTypes.MoveNext
Wend

What happens is that i've got this menu, by default with one item (the first).
I wan't to remove it because it doesn't matter anymore after loading fields from DB.
How can I do this?

Another question:
How do I associate code to the dynamically generated menu items?
Thanks.