Duda con los datetime

[neivan]

deberas tener un funcion q contole si estas en el me 1 reste un año y ponga el 12 de ems

para coger datos especificos

datetime.now.tostring("MM") 'mes actual
datetime.now.tostring("dd") 'dia
datetime.now.tostring("yyyy") 'año

dim d as date
d = calculardate()

function calculardate()
dim d as date
dim mes as integer
dim año as integer
if datetime.now.tostring("MM")= 1 then
mes=12
año=datetime.now.tostring("yyyy") - 1
else
mes=datetime.now.tostring("MM") - 1
end if
d=datetime.now.tostring("dd") & "/" & mes % "/" & año
'no se si habria q ponerlo todo entre comillas simples,prueba priemro asi
return d
endf f.