E l'image list si deve chiamare imlMenu...


codice:
'Prendo il primo menu
     hMenuFile = GetSubMenu(hMenuBarra, 0)

     '* Assegnazione immagini Menu File
'Alla prima voce del primo menu associo le bitmap indicate...
     ris = SetMenuItemBitmaps(hMenuFile, 0, MF_BYPOSITION, _
         imlMenu.ListImages(1).Picture.Handle, _
         imlMenu.ListImages(1).Picture.Handle)
E se mi dite che non funziona vengo a casa vostra...