Come disattivare il pulsante Chiudi in Visual Basic 6

Visual Basic 6 non include un tipo di finestra che ha un pulsante disattivato stretta . È necessario disattivare il pulsante di chiusura se si vuole un dialogo azione richiesta di informazioni specifiche da parte dell'utente che non deve chiudere . Si noti che si finisce fastidiosi tuoi utenti se non riescono a chiudere la finestra principale del programma con il pulsante di chiusura o di qualche pulsante che lo chiude. Se si richiama una determinata funzione all'interno del vostro sistema operativo , il programma di VB può rimuovere il suo pulsante di chiusura . Istruzioni
1

Aprire il progetto in Visual Basic .
2

Vai alla tua finestra di codice e digitare il seguente codice in alto. Questo codice rende Visual Basic riconoscere alcune funzioni delle librerie da Windows necessari per rimuovere il vostro pulsante di chiusura :

Private Declare Function GetSystemMenu Lib " user32" _

( ByVal hwnd As Long , _

ByVal bRevert As Long ) As Long

private Declare Function RemoveMenu Lib " user32" _

( hMenu ByVal As Long , _ ByVal

nPosition As Long , _

wFlags ByVal As Long ) As Long
3

Scrivi la seguente dichiarazione di sotto delle dichiarazioni di funzione di Windows private effettuate : private Const MF_BYPOSITION = & H400 &
. 4

Tipo il seguente all'interno della funzione " Form_Load " del modulo vuoi disattivare il pulsante di chiusura di :

Dim SYSMENU As Long

SYSMENU = GetSystemMenu ( Form1. hwnd, 0 ) per

RemoveMenu ( SYSMENU , 6 , MF_BYPOSITION ) per