Another way to place images within menu

'	Add one form to the project.
'	Add a picturebox (Autosize = True) with a bitmap (not an icon!!!), max. 13X13
'	Add a commandbutton with following code:
Private Sub Form_Load()
hMenu& = GetMenu(Form1.hwnd)
hSubMenu& = GetSubMenu(hMenu&, 0)
hID& = GetMenuItemID(hSubMenu&, 0)
SetMenuItemBitmaps hMenu&, hID&, MF_BITMAP, _
Picture1.Picture, _
Picture1.Picture
End Sub