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 , _
< p > 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
RemoveMenu ( SYSMENU , 5 , MF_BYPOSITION ) economici 5
Costruisci il tuo progetto ed eseguire il file eseguibile .