Ah, ¿con qué tú eres el que no sangra el código?
Te faltó mencionar lo más importante a la hora de solicitar ayuda sobre un error:
el mensaje de error que te aparece.
El problema que le veo a tu código (además de la falta de sangrado) es que al tener el primer
If un punto y coma justo después de
Then, éste queda cerrado en ese punto y por lo tanto no hay validez al colocar un
Else posteriormente sin otro
If de por medio.
Te sobra un punto y coma.
Saludos y a usar más la barra espaciadora (dos espacios dentro de cada Begin está bien

).
Si no, un abrazo.
Al González.
