Sådan deaktiverer lukke -knappen i Visual Basic 6

Indlæg af Annette Dalgaard     opdateret: 2011-11-21

Visual Basic 6 omfatter ikke et vindue type , der har en handicappet tæt knap. Du er nødt til at deaktivere den tætte knappen , hvis du ønsker en handling dialog anmoder specifikke oplysninger fra brugeren , der skal ikke lukke . Bemærk , at du ender irriterende dine brugere , hvis de ikke kan lukke hovedvinduet af dit program med den tætte knappen eller nogle knap, der lukker det . Hvis du kalder en bestemt funktion i styresystemet , kan din VB program fjerne sit tætte knap
1 .
Åbn dit projekt i Visual Basic .
2 .
Gå til din kode vinduet og skriv følgende kode på toppen . Denne kode gør Visual Basic anerkende visse bibliotekets funktioner fra Windows nødvendigt at fjerne din nære knappen:

Private fastslås Funktion GetSystemMenu Lib " User32 " _

( ByVal HWND As Long , _
ByVal bRevert As Long ) As Long

Private fastslås Funktion RemoveMenu Lib " User32 " _

( ByVal hMenu As Long , _
ByVal nPosition As Long , _
ByVal wFlags As Long ) As Long
3 .
Skriv følgende erklæring under private Windows-funktion erklæringer du har lavet : Privat Const MF_BYPOSITION= H400
4
Indtast op således inde i " Form_Load . " funktion af den formular, du vil deaktivere den tætte knappen :

Dim sysMenu As Long


sysMenu=GetSystemMenu ( Form1. hwnd , 0 )

RemoveMenu ( sysMenu , 6 , MF_BYPOSITION )
RemoveMenu ( sysMenu , 5 , MF_BYPOSITION )
5 .
Byg dit projekt og køre den eksekverbare .


Previous:Hvordan klarer c pointers Next:hvordan man åbner en postsættet



 

Kommentarer

Code:
change