If MsgBox("Egyetértesz?", vbYesNo) = vbYes Then
MsgBox("Akkor jó.")
Else
MsgBox("Reklamációnak helye nincs.")
End if