Jeg vil oprette en ja/nej meddelsesbox

Dim iAnswer As Integer

iAnswer=MsgBox(\"Vil Du Fortsætte?\",vbYesNo+vbQuestion)

If iAnswer=vbYes Then
\'du trykkede ja
ElseIf iAnswer=vbNo Then
\'du trykkede nej
Else
\'Aner ikke hvad u trykkede på :o)
End If

/Jennemaan

Du skal indsætte følgende kode i eventen for det du vil have til at udløse Meddelesesboksen

Man kan ikke ændre start fokus i msgbox men , du kan omformulere så det er ja der returnere istedet
så skal du også ændre vbYes til vbNo.

If MsgBox(\"BESKED TIL BRUGEREN\", vbYesNo, \"TITEL PÅ BESKEDEN\") = vbYes Then Me.Visible = False

du kan skrive

iAnswer=MsgBox(\"Vil Du Fortsætte?\",vbYesNo+vbQuestion+vbDefaultButton1) \'hvis knap 1 skal være default
iAnswer=MsgBox(\"Vil Du Fortsætte?\",vbYesNo+vbQuestion+vbDefaultButton2) \'hvis knap 2 skal være default

osv..

/Jennemaan

Så er det da kortere at skrive

If MsgBox(\"BESKED TIL BRUGEREN\", vbYesNo+vbDefaultButton1, \"TITEL PÅ BESKEDEN\") = vbYes Then Me.Visible = False

Husk den aktive formular skal også lukkes

wizzcat> den skal lukke 3 formularer f.eks formular1,2,3 og åbne 1 \"hovedmenu

Her løst det, er bare ved at være halvtræt.
10 point til wizzcat og 5 til jennemaan

Tak