Функция созвездия преобразования даты, параметры - тип даты, к ней могут обратиться нуждающиеся друзья.
Скопируйте код следующим образом:функция astro(рождение)
astro=
если рождение= или нет isdate(рождение) Затем выйдите из функции
рождениемесяц=месяц(рождение) : если месяц рождения<10, то месяц рождения=0 и месяц рождения день рождения
=день(рождение) : если день рождения <10, затем день рождения=0 и день рождения
рождение=обрезка(месяц рождения и день рождения) 'Месяц и день реорганизации, 0903 типа
rAstro=split(Водолей*0120*0219#Рыбы*0220*0320#Овен*0321*0420#Телец*0421*0521#Близнецы*0522*0621#Рак *0622*0722#Лев*0723*0823#Дева*0824*0923#Весы*0924*1023#Скорпион*1024*1122#Стрелец*1123*1222#Козерог*1222*0119#,#)
astro=Capricorn' Сегодня канун Нового года, поэтому сравнивать сложно. Давайте по умолчанию от
i_ls=0 до ubound(rAstro)-2
rls2=split(rAstro(i_ls) & *,*)
ifbirth>=rls2(1). ) и рождение<=rls2(2), затем
astro=rls2(0)
выход для
завершения, если
следующая
функция завершения