Om jag vill kunna välja när en MsgBox visas
Ex (Ja) Form2.Visible=True
(Nej) Form2.Visible=True

Hur gör man då enklast?


Sören

Förstår inte frågan?

Menar du att en msgbox med Ja/Nej knappar så visas Form1 eller inte?

ex:
If MsgBox("Vill du se Form", vbYesNo, "Se ?") = vbYes Then
Form1.Visible = True
Else
Form1.Visible = False
End If

tD

Jag tror du kan göra på följande sätt:

<code>
Medelande = Msgbox("Vill du visa knapp?", vbYesNo, "Fråga")
If Medelande = VbNo Then
'Kod som skall vara om man trycker på No
ElseIf Medelande = VbYes Then
'Kod som skall vara om man trycker på yes
End if
</code>

Det kanske finns nåt enklare sätt men detta skall fungera iallfall!

/Niclas

Det blev alldeles utmärkt
Man tackar.


Sören

Opps!
Det går inte att ändra "Ja" och "Nej" till något annat


Sören

Klart det inte går att ändra Ja/Nej till något annat om det är det utseende du valt till din MsgBox. Du har ett antal olika varianter att välja på:
[Taget ur hjälpen i XL]
Constant Value Description
vbOKOnly 0 Display OK button only.
vbOKCancel 1 Display OK and Cancel buttons.
vbAbortRetryIgnore 2 Display Abort, Retry, and Ignore buttons.
vbYesNoCancel 3 Display Yes, No, and Cancel buttons.
vbYesNo 4 Display Yes and No buttons.
vbRetryCancel 5 Display Retry and Cancel buttons.
vbCritical 16 Display Critical Message icon.
vbQuestion 32 Display Warning Query icon.
vbExclamation 48 Display Warning Message icon.
vbInformation 64 Display Information Message icon.
vbDefaultButton1 0 First button is default.
vbDefaultButton2 256 Second button is default.
vbDefaultButton3 512 Third button is default.
vbDefaultButton4 768 Fourth button is default.
vbApplicationModal 0 Application modal; the user must respond to the message box before continuing work in the current application.
vbSystemModal 4096 System modal; all applications are suspended until the user responds to the message box.
vbMsgBoxHelpButton 16384 Adds Help button to the message box
VbMsgBoxSetForeground 65536 Specifies the message box window as the foreground window
vbMsgBoxRight 524288 Text is right aligned
vbMsgBoxRtlReading 1048576 Specifies text should appear as right-to-left reading on Hebrew and Arabic systems

/EE