Código:
<script language=vbscript>
if MsgBox("En ClubDelphi encuentras siempre la respuesta?", vbYesNo + vbQuestion, "ClubDelphi") = vbYes then
MsgBox "Yo tambien!", vbInformation
else
MsgBox "Es porque has debido preguntar el origen del universo!", vbInformation
end if
</script>
Tambien puedes analizar el método
showModalDialog y hacer "tu propio" confirm.