Visual Basic 6 non include un tipo di finestra che ha un pulsante di chiusura disabilitato. È necessario disattivare il pulsante di chiusura, se si vuole un dialogo mirante informazioni specifiche da parte dell'utente che non deve chiudere. Si noti che si finisce per fastidiosi gli utenti se non possono chiudere la finestra principale del programma con il pulsante di chiusura o di qualche pulsante che chiude. Se si chiama una determinata funzione all'interno del vostro sistema operativo, il programma VB in grado di rimuovere il suo pulsante di chiusura.

istruzione

1 Aprire il progetto in Visual Basic.

2 Vai alla finestra di codice e digitare il seguente codice in alto. Questo codice rende Visual Basic riconoscere alcune funzioni di libreria da Windows necessario per rimuovere il 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" _

(ByVal hMenu As Long, _

ByVal nPosition come lungamente, _

wFlags ByVal As Long) As Long

3 Scrivi la seguente dichiarazione di seguito le dichiarazioni di privati ​​finestre delle funzioni apportate: Private Const MF_BYPOSITION = & H400 &.

4 Digitare il seguente all'interno della funzione "Form_Load" del modulo che si desideri disattivare il pulsante di chiusura di:

Dim SYSMENU As Long

SYSMENU = GetSystemMenu (Form1.hWnd, 0)

RemoveMenu (SYSMENU, 6, MF_BYPOSITION)

RemoveMenu (SYSMENU, 5, MF_BYPOSITION)

5 Costruisci la tua progetto ed eseguire il file eseguibile.