Visual Basic 6 ikke omfatter et vindu type som har en funksjonshemmet tett knapp . Du må deaktivere tett knappen hvis du vil ha en handling dialog ber om spesifikk informasjon fra brukeren som ikke skal lukke. Legg merke til at du ender opp med irriterende brukerne hvis de ikke kan lukke hovedvinduet til programmet ditt med lukkeknappen eller noen knapp som lukker den. Hvis du ringer en bestemt funksjon i operativsystemet , kan VB program fjerne det nære knappen . Instruksjoner
en

Åpne prosjekt i Visual Basic.
2

Gå til koden din , og skriv inn følgende kode på toppen. Denne koden gjør Visual Basic gjenkjenne visse biblioteket funksjoner fra Windows er nødvendig for å fjerne lukkeknappen :

Private Declare Function GetSystemMenu Lib " user32 " _

( ByVal hwnd Som Long , _
< p> ByVal bRevert As Long) As Long

Private Declare Function RemoveMenu Lib " user32 " _

( ByVal hMenu Som Long , _

ByVal nPosition Som Long , _

ByVal wFlags så lenge ), så lenge
3

Skriv følgende erklæring under de private Windows funksjonstaster erklæringer du har gjort : Privat Konst MF_BYPOSITION = & H400 &
. 4

Type opp følgende inne i " Form_Load " funksjon på formen du ønsker å deaktivere lukkeknappen av:

Dim sysMenu Som Long

sysMenu = GetSystemMenu ( Form1. hwnd , 0 )

RemoveMenu ( sysMenu , 6 , MF_BYPOSITION )

RemoveMenu ( sysMenu , 5 , MF_BYPOSITION )
5

Bygg din prosjektet og kjøre den kjørbare .