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 , _ < br >
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.