Hola
No sabría decirlo fijo, pero creo que el horóscopo chino depende solo del año de nacimiento, tendrías que pedir al usuario que introduzca su fecha de nacimiento, coger solo el año con la función year y realizar un select case con los distintos casos.
Código:
Select case year(fecha)
Case 1976 or 1983 or 1997 or 2006
msgbox "Pertenece al ..."
...
--Saludos--