Sencillo, cuando creas un menú con el editor de menú, poné uno de los items, como matriz, (click en index), y lo ponés en invisible.
de esa manera, vos podés agregar con código tantos subitems quieras, con la sentencia Load
Ej: el Sub menú \\\" mnuFileList \\\"
MENUprincipal
.......Un menu standar
....... menuMatriz (Visible false, name mnuFileList )
Private sub agrego_menu( )
Load mnuFileList(1)
mnuFileList(1).Caption = \\\"Primer Sub Menu\\\"
mnuFileList(1).Visible = True
Load mnuFileList(2)
mnuFileList(2).Caption = \\\"Segundo Sub Menu\\\"
mnuFileList(2).Visible = True
end sub
Con un Bucle For Next, podés ahcer una carga bastante rápida y sin muchos inconvenientes.
Espero te sirva.
BENJO