no me referia a la funcion sino a que si hay al algo como CINT que lo que haga sea esto
si el numero que le paso sea menor que 10, que tenga un digito me ponga un bonito "0" delante.
ej:
5 que retone un 05
yo he creado un funcion parecida pero pone la fecha español o en ingles.
Código:
function CambiarFecha(hora,tipo)
if day(hora) < 10 then
dia = "0" & Day(hora)
else
dia = Day(hora)
end if
if Month(hora) < 10 then
mes = "0" & Month(hora)
else
mes = Month(hora)
end if
if tipo = 1 then 'español
CambiarFecha = dia & "/"& mes & "/" & year(hora) & " " & FormatDateTime(hora,3)
else ' ingles
CambiarFecha = mes & "/"& dia & "/" & year(hora) & " " & FormatDateTime(hora,3)
end if
end function