Visual Basic 6 bevat geen venster type dat een gehandicapte sluitknop heeft . U moet de knop Sluiten uitschakelen als u wilt een actie dialoogvenster om specifieke informatie van de gebruiker die niet mogen sluiten . Merk op dat je uiteindelijk vervelende uw gebruikers als ze niet kunnen sluiten het hoofdvenster van het programma met de knop Sluiten of een knop die het sluit . Als u een bepaalde functie binnen uw besturingssysteem te bellen , kan uw VB-programma zijn sluitknop te verwijderen . Instructies
1 Open uw project in Visual Basic . Kopen van 2 Ga naar uw raam code en typ de volgende code aan de top . Deze code maakt Visual Basic herkennen bepaalde library functies van Windows nodig om uw sluitknop verwijderen : Private Declare Function GetSystemMenu Lib
" user32 " _
( ByVal hwnd zoals lang, _
ByVal bRevert als lang) als Long
Private Declare Function RemoveMenu Lib " user32 " _
( ByVal HMENU zoals lang, _ ByVal Nposition
zoals lang, _ < br ByVal wFlags > As Long ) As Long
3 Schrijf de volgende verklaring onder de prive Windows -functie aangiften die u gemaakt : private Const MF_BYPOSITION = & H400 &
. Typ het volgende in het " Form_Load " functie van het formulier dat u wilt op de sluitknop van uitschakelen 4 : Dim sysMenu As Long sysMenu
= GetSystemMenu ( Form1.
hwnd , 0 ) RemoveMenu
( sysMenu , 6 , MF_BYPOSITION ) RemoveMenu
( sysMenu , 5 , MF_BYPOSITION )
5 Bouw je project en start het uitvoerbare .
|
