Password

A penas me inicio en programas Visual Foxpro, si me pudieras apoyar, quiero hacer un formulario que si se escribe el usuario y contraseña correcta, permita ingresar a otro formulario, pero después de 3 intentos erróneos, me saque del formulario con un mensaje de error, quise intentarlo con un ciclo for pero no lo respeta, si me puedes apoyar. Te envío el programa del botón ACEPTAR. Gracias.
a=0
if Thisform.Text1.Value= "maya" and Thisform.Text2.Value= 25
do form calculadora
else
for a= 0 to 3
messagebox ("clave incorrecta")
a= a +1
thisform.text1.setfocus
Endfor
Endif
messagebox("infringiste en error los 3 intentos de acceso, tu cuenta ha sido bloqueada")
RELEASE thisform

{"Lat":10.4878118820567,"Lng":-101.25}