日期转换星座函数,参数是日期型的，需要的朋友可以参考下。

代码如下: function astro(birth) astro=”” if birth=”” or not isdate(birth) Then exit function birthmonth=month(birth) : if birthmonth<10 then birthmonth=”0″ & birthmonth birthday=day(birth) : if birthday<10 then birthday=”0″ & birthday birth=trim(bi