Programación General > Visual Basic 6.0 e inferiores
Menu Con Iconos
(1/1)
fher123:
como puedo poner iconos en los menus de mis programas.
como office etc.
si me puedenb ayudar envien algo a fertejr3@hotmail.com
MindEye:
- Mira a ver si te vales el codigo que te dejo aquí.
- No es mío, lo encontre en la red.
- Hasta pronto y suerte.
RadicalEd:
MIRA ASI CON UN PICTURE DE 16*16
--- Código: Text --- Const MF_BYPOSITION=&H400&API's GetMenu, GetSubMenu, SetMenuItemBitmapsPrivate Sub Form_Load()Dim menu As Long, submenu As Longmenu = GetMenu(Me.hwnd)If menu=0 Then MsgBox "No hay menu" EndEnd Ifsubmenu = GetSubMenu (menu, 0)If submenu=0 Then MsgBox "No hay submenu" EndEnd IfSetMenuItemBitmaps submenu, 0, MF_BYPOSITION, Pic1.Picture, Pic1.PictureEnd Sub [/color]
Navegación
Ir a la versión completa