FoxPro/Visual FoxPro - messagebox()

que tal a todos,

como puedo hacer que en un messagebox() pueda elegir si o no
para tomar una desicion.

gracias de ante mano

eMessageTitle = 'Mi Applicacion'
eMessageText = 'Registro no encontrado.Quieres seguir buscando?'
nDialogType = 4 + 16 + 256
* 4 = Boton Si y No
* 16 = Icono de Alto
* 256 = El segundo boton es el default

nAnswer = MESSAGEBOX(eMessageText, nDialogType, eMessageTitle)

DO CASE
CASE nAnswer = 6
WAIT WINDOW 'Escogiste Si'
CASE nAnswer = 7
WAIT WINDOW 'Escogiste No'
ENDCASE

Suerte

mensaje=messagebox("Seleccione una opcion",4+48,"Opciones")

If mensaje=6 && 6 quiere decir "Si"...si el usuario pulsa sobre "Si"
condicion
else
condicion de no
endif


Suerte