Victor me salto un error

el que me diste vos lo pase asi
a=2007
b=6
c=30
d= "Valida"
e= "Invalida"
If a > 1900 And a < 3000 And b > 0 And b <= 12
If c <= 28 Or (c = 29 And b = 2 And ( a % 4 ) = 0) Or ;
(c = 31 And AllTrim( b ) $ "1.3.5.7.8.10.12") Or ;
(c = 30 And AllTrim( b ) $ "4.6.9.11")
?d
Else
?e
EndIf
EndIf
puse d y e como variable sino no sabia que era cMess valida y cMess Invalida
pero bue, venia bien hasta que probe con dias 30 y 31
me tira este error
Program error
Function argument value, type, or count is invalid
esto solo pasa si pongo dias 30 o 31, lo demas anda barbaro,
y otra cosa en ves de poner la funion alltrim, no se podria usar inlist
muchisimas gracias

Ahora si anda barbaro, victor vos me podrias decir que es lo que hace esa funcion AllTrim
por que yo busque y me dice que deja un lugar tanto a la derecha como a la izq, y la verdad no entiendo, y para que es el STR que agregaste y el signo $ muchisimas gracias

c = 31 And AllTrim( Str( b ) ) $ "1.3.5.7.8.10.12") Or
tonces en este renglon como funciona alltrim, donde quitas los espacios, por que no entiendo =)

Vitro  tu eres profesor de VFP, por que la verdad estaria encantado de ser alumno tuyo, si das clase dime donde por fa
abrazos y mil gracias
no lo cierro por si te tengo que preguntar algo mas
 

ok Victor Muchisimas gracias y cualquier duda nos estamos viendo nuevamente, abrazos