Avatar billede nyholm Novice
26. november 2006 - 15:13 Der er 1 kommentar og
1 løsning

Alternativsvar på msg-fråga

Om jag anvænder vbYesNoCancel som alternativ vid en msg-fråga, hur skriver jag hændelsen før alternativ 2 och 3.
Ex.
If msg(strMsg, vbQuestion + vbYesNoCancel, "Typ av avräkning?") = vbYes Then
      Me.Avrakna = 99
      ?(if vbNo) then
      Me.Avrakna = 77
      ?(If vbCancel) then
      me.Avrakna = 66
Avatar billede helmet Nybegynder
26. november 2006 - 15:20 #1
Du kan gemme resultatet af msgbox i en variabel og bruge den bagefter
Fx.

Dim temp As VbMsgBoxResult

    temp = MsgBox(strMsg, vbQuestion + vbYesNoCancel, "Typ av avräkning?")
    Select Case temp
    Case vbYes
    Me.Avrakna = 99
    Case vbNo
    Me.Avrakna = 77
    Case vbCancel
    me.Avrakna = 66
    End Select
Avatar billede nyholm Novice
26. november 2006 - 17:38 #2
Alldeles utmærkt! Tack før svaret.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester