Tipos y utilidades para MessageBox

* Caracteres ASCII para MessageBox .

  Nueva Línea: ~n
  Tabulación horizontal: ~t
  Tabulación vertical: ~v
  Retorno de línea: ~r
  Avance de hoja: ~f
  Backspace: ~b
  Comilla doble: ~"
  Comilla simple: ~'
  Tilde: ~~
  Cualquier carácter base decimal: ~### (3 dígitos numéricos de 000 a 255)
  Cualquier carácter base hexadecimal: ~h## (2 digitos hexa desde 01hasta FF)
  Cualquier carácter base octal: ~o### (3 dígitos octales de 000 a 377)
 Ejemplos:
  Messagebox('Atención','Si existe Fecha Fin Real, la actividad ~n~r debe estar confirmada', Exclamation!)
  "~64" Nos mostraría el carácter ASCII correspondiente ,o sea @
  "~hF1" Nos mostraría el carácter ASCII correspondiente , o sea la ñ

* Simbolos para MessageBox 

   ·    Information! (Default)
   ·    StopSign!
   ·    Exclamation!
   ·    Question!
   ·    None!

*Botones en   MessageBox 
   ·    OK! — (Default) OK button

   ·    OKCancel! — OK and Cancel buttons

   ·    YesNo! — Yes and No buttons

   ·    YesNoCancel! — Yes, No, and Cancel buttons

   ·    RetryCancel! — Retry and Cancel buttons

   ·    AbortRetryIgnore! — Abort, Retry, and Ignore buttons 

   Ejemplos:
   long result

   result = MessageBox("Result", Abs(Distance), &
                Exclamation!, OKCancel!, 2) //aqui se coloca 2 para q el boton de cancelar sea por defecto
        IF result = 1 THEN

         ................
       ELSE

        ................
       END IF
--------- Mostrar en 2 o mas lineas +&------------
messagebox('Atencion','El cargo que se le asignó no permite ver ~n~r' +&
                                 'esta actividad, o esta Actividad'+&
                                 ' no le pertenece',StopSign!)