如何输入某个年份后，获得该年所对应的生肖是什么？

Question

如上，多谢。

Answer 1

select case year mod 12
   case 1
       '鸡
   case 2
       '猴
   '……
end select

Answer 2

楼猪真大方,这个还50分.别忘了给偶分一点.
不就12生肖吗? 计算年差,用之 mod 12,然后...唉,好像没什么多说的

Answer 3

'送佛送到西吧
'year是整形的年份select case year mod 12
   case 1
       '鸡
   case 2
       '猴
   case 3
       '羊
   case 4
       '马
   case 5
       '蛇
   case 6
       '龙
   case 7
       '兔
   case 8
       '虎
   case 9
       '牛
   case 10
       '鼠
   case 11
       '猪
   case 12
       '狗
end select

Answer 4

错了，晕，应该是
select case year mod 12
   case 0
       '狗
   case 1
       '鸡
   case 2
       '猴
   case 3
       '羊
   case 4
       '马
   case 5
       '蛇
   case 6
       '龙
   case 7
       '兔
   case 8
       '虎
   case 9
       '牛
   case 10
       '鼠
   case 11
       '猪
end select

Answer 5

select case year mod 12 结果等于0怎么办呢？比如2004年。