uiloggen annuleren

[timmy92]

hoi,

ik heb een progje gemaakt om ergens inteloggen en uit te loggen nou wil ik dat al sje op uitloggen klikt er een msgbox verschijnt. dat luk t wel maar als j eop cancel klik wil ik dat hij het uiloggen annuleerd. hoe moet dit?

ik doe het volgende: msgbox "Weet je zeker dat je wilt uitloggen?",vbokcancel or vbinformation,"Log out"

hoe moet ik dan verer

alvast bedankt

 

[MerlinTheGreat]

Re: MsgBox

Een MsgBox kan als een functie aangeroepen worden en zo een antwoord teruggeven.
In jou geval zou dat kunnen zijn:

intAntwoord = msgbox("Weet je zeker dat je wilt uitloggen?",vbokcancel or vbinformation,"Log out")
If intAntwoord = vbCancel then ' Annuleren geklikt
  ' Hier plaats je de code die moet uitgevoerd worden bij Annuleren
ElseIf intAntwoord = vbOK then ' OK geklikt
  ' Hier plaats je de code die moet uitgevoerd worden bij OK
Else
  ' Hier plaats je de code die in alle andere gevallen moet uitgevoerd worden
End If

Je kan ook op meerdere antwoorden controleren door de Select Case structuur te gebruiken.
Voorbeeld:

intAntwoord = msgbox("Weet je zeker dat je wilt uitloggen?",vbokcancel or vbinformation,"Log out")
Select Case intAntwoord 
  Case Is = vbCancel ' Annuleren geklikt
    ' Hier plaats je de code die moet uitgevoerd worden bij Annuleren
  Case Is = vbOk ' OK geklikt
    ' Hier plaats je de code die moet uitgevoerd worden bij OK
  Case Else
    ' Hier plaats je de code die in alle andere gevallen moet uitgevoerd worden
End Select

Vergeet niet de optie voor definitie van ALLE variabelen aan te zetten in de IDE. Dan kan je nooit een niet-gedefinieerde variabele tegenkomen (tikfouten e.d.) Deze optie zet automatisch bovenaan elke module, class, form, enz... de instructie

Option Explicit

. Je kan dat zelf ook doen, maar alles wat je automatisch kan laten doen...

:thumb:

 

[timmy92]

bedankt ik wist dat het met een if-statement kon maar bij goolge had ik ook al iet sgevonden met select case