代码如下: 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(birthmonth & birthday) ‘重整月日,0903型 rAstro=split(“水瓶座