1
Abra el proyecto en Visual Basic .
2
Ir a la ventana de código y escriba el siguiente código en la parte superior . Este código hace que Visual Basic reconocen determinadas funciones de biblioteca de Windows necesarios para quitar el botón de cierre :
Private Declare Function GetSystemMenu Lib " user32 " _
( ByVal hwnd As Long , _
< p> bRevert ByVal As Long ) As Long
Private Declare Function RemoveMenu Lib " user32 " _
( hMenu ByVal As Long , _
Nposition ByVal As Long , _
wFlags ByVal As Long ) As Long
3
Escribe la siguiente declaración a continuación las declaraciones de función de Windows privados realizados : MF_BYPOSITION Private Const = & H400 y
. 4
Tipo de la siguiente dentro de la función " Form_Load " de la forma desea deshabilitar el botón de cierre de :
SYSMENU Dim As Long
SYSMENU = GetSystemMenu ( Form1. hwnd , 0 )
RemoveMenu ( SYSMENU , 6 , MF_BYPOSITION )
RemoveMenu ( SYSMENU , 5 , MF_BYPOSITION )
5
Genere el proyecto y ejecutar el ejecutable.