RE:DESAPARECER CONTROLBOX EN UN FORMULARIO MDI
hola, tenes que usar estas:
Private Declare Function GetSystemMenu Lib "user32" (ByVal hWnd As Long, ByVal bRevert As Long) As Long
Private Declare Function RemoveMenu Lib "user32" (ByVal hMenu As Long, ByVal nPosition As Long, ByVal wFlags As Long) As Long
'la llamada es algo asi:
Public Sub RemoverMenuClose(TargetForm As Form)
Dim lSysMenu As Long
lSysMenu = GetSystemMenu(TargetForm.hWnd, 0&)
Call RemoveMenu(lSysMenu, 6, MF_BYPOSITION)
End Sub
Mirá el valor (en este caso 6 fijo, porque así lo necesité)
el resto de los valores es:
rmMove = 1
rmSize = 2
rmMinimize = 3
rmMaximize = 4
rmClose = 6
espero te sirva
saludos