Remove Max and Min Buttons on MDI Forms

Category:

Forms and Controls

Type:

Snippets

Difficulty:

Beginning

Author:

Intelligent Solutions Inc.

Version Compatibility: Visual Basic 6, Visual Basic 5

More information:

MDI forms don't have MinButton and MaxButton properties, so you can use these functions to remove them from the MDI form. Pass the MDIForm itself as the parameter.

Instructions: Copy the declarations and code below and paste directly into your VB project.

Declarations:
Option Explicit Private Declare Function GetWindowLong Lib "user32" _ Alias "GetWindowLongA" (ByVal hWnd As Long, _ ByVal nIndex As Long) As Long Private Declare Function SetWindowLong Lib "user32" _ Alias "SetWindowLongA" (ByVal hWnd As Long, _ ByVal nIndex As Long, ByVal dwNewLong As Long) _ As Long Private Const GWL_STYLE = (-16) Private Const WS_MINIMIZEBOX = &H20000 Private Const WS_MAXIMIZEBOX = &H10000

Code: