FoxPro/Visual FoxPro - Como utilizar messagebox ?

Si bien puedo utilizar esta sentencia del modo siguiente :

messagebox("Fecha inicial no puede ser superior a la final")

quisiera saber como puedo hacerlo para hacer una pregunta interactiva
del mismo modo que se hace en visual-basic utilizando los vbyes o vbno

If MsgBox("Desea continuar ") = vbYes Then

Hola.

Prueba lo siguiente:
OP = 0
OP = MESSAGEBOX("Elimina Este Registro",1+48+256)
IF OP = 1
DELETE
UNLOCK
SKIP -1
ENDIF

Valor Botones del cuadro de diálogo
0 Sólo botón Aceptar.
1 Botones Aceptar y Cancelar.
2 Botones Anular, Reintentar e Ignorar.
3 Botones Sí, No y Cancelar.
4 Botones Sí y No.
5 Botones Reintentar y Cancelar.
Valor Icono
16 Punto.
32 Signo de interrogación.
48 Signo de exclamación.
64 Icono de información (i).
Valor Botón predeterminado
0 Primer botón.
256 Segundo botón.
512 Tercer botón.

Saludos.

Probá con esto.

Titulo = 'My Application'
Texto = 'Record not found. Would you like to search again?'
TipoVentana = 4 + 32 + 256

Response = MESSAGEBOX(Texto,TipoVentana,Titulo )

IF Response=6 && Si responde que si
hace lo que necesitas
ELSE
hace lo otro que necesitas
ENDIF

como ago que el valor devuelto se almacene en la variable

si te fijas en el ejemplo anterior veras que dice:


asi k response tiene el valor devuelto