Cómo deshabilitar el botón Cerrar en Visual Basic 6

Visual Basic 6 no incluye un tipo de ventana que tiene un botón deshabilitado cerca . Es necesario deshabilitar el botón Cerrar si desea un diálogo de acción tendente a obtener información específica del usuario que no debe cerrarse. Tenga en cuenta que terminan molestos a los usuarios si no pueden cerrar la ventana principal del programa con el botón de cierre o algún botón que cierra. Si se llama a una función determinada dentro de su sistema operativo , su programa VB puede quitar su botón de cierre. Instrucciones
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.