还津阁 >风水知识 >生肖运势

求十二生肖和年龄对照表

   鼠 牛 虎 免 龙 蛇 马 羊 猴 鸡 狗 猪,

十二生肖年龄对照表

  龙:1,13,25,37,49,61,73,85,97   蛇:12,24,36,48,60,海2,84,96   马:11,23,35,47,59,71,83,95   羊:10,22,34,46,58,70,82,94   猴:9,21,33,45,57,69,81,93   鸡:8,20,32,44,56,68,80,92   狗:7,19,31,43,55,67,79,91   猪:6,18,30,42,54,66,78,90   鼠:5,17,29,41,53,65,77,89   牛:4,16,28,40,52,64,76,88   虎:3,15,27,39,51,63,75,87   兔:2,14,26,38,50,62,74,85   以上年龄是以虚岁计算的,?

2023年(癸卯)年属相、1岁-100岁年龄对照表(按虚岁算)要个图

  n j b j n g h b v g h b f y h v g h b c d y g f tio k b ee q f v s w g v k

vb程序:用inputBox输入的生日,通过MsgBox输出其对应的年龄,出生季节和属相

  如果出生日期输入格式为19861212这种格式的话。以1-3月为春季?4-6月为夏季、7-9月为秋季 10-12月为冬季!用以下代码:   Private Sub Form_Load()   Dim birth As String   Dim year As Integer   Dim month As Integer   Dim day As String   Dim old As Integer   Dim season As String   Dim sx As Integer   Dim fx As String   birth = Trim(Str(InputBox("请输入您的生日!格式为19741212")))   year = Val(Left(birth, 4))   month = Val(Mid(birth, 5, 2))   day = Right(birth, 2)   old = 2015 - year   Select Case month   Case Is <= 3   season = "春季"   Case Is <= 6   season = "夏季"   Case Is <= 9   season = "秋季"   Case Is <= 12   season = "冬季"   End Select   sx = (year - 2016) Mod 12   If sx < 0 Then   sx = sx + 12   End If   Select Case sx   Case 0   fx = "猴"   Case 1   fx = "鸡"   Case 2   fx = "狗"   Case 3   fx = "猪"   Case 4   fx = "鼠"   Case 5   fx = "牛"   Case 6   fx = "虎"   Case 7   fx = "兔"   Case 8   fx = "龙"   Case 9   fx = "蛇"   Case 10   fx = "马"   Case 11   fx = "羊"   End Select   MsgBox "您的年龄为:" & old & vbCrLf & "您的出生季节为:" & season & vbCrLf & "您的属相为:" & fx   End Sub   我也就是闲着无聊 给这5分都不够敲键盘的?

月份与星座对照表水瓶座

  星座是0509按阳历划分的!水瓶座是阳历1/20-2/18?   下面为你介绍十二星座(太阳星座)!供你对照:   星座名 ? 日期 ! 星座属性 , 幸运数字,辛运颜色!   白羊座 03/21 - 04/19 火象星座 6,7,鲜红色,血红色,   金牛座 04/20- 0520 土象星座 1,9 紫色。   双子座 05/21 - 06/20 风象星座 3,5,7,淡粉色?   巨蟹座 06/21- 07/22 水象星座 8,3、大地色,   狮子座 07/23 - 08/22 火象星座 5,9 褐色,深红色   处女座 08/23 - 09/22 土象星座 4,8、黄色,   天秤座 09/23 - 10/22风象星座 6,9?橙色。   天蝎座 10/23 - 11/21 水象星座 3,5。暗灰色?深红色,   射手座 11/22 - 12/21 火象星座 9!黑色 白色?灰色,   摩羯座 12/22 - 01/19 土象星座 3,7 深红色!   水瓶座 01/ 20- 02/18 风象星座 4,8!金黄色?   双鱼座 02/19- 03/20 水象星座5,8。紫色?,年龄属相对照表

vb程式:用inputBox输入的生日,通过MsgBox输出其对应的年龄,出生季节和属相

如果出生日期输入格式为19861212这种格式的话?以1-3月为春季,4-6月为夏季!7-9月为秋季!10-12月为冬季、用以下程式码: Private Sub Form_Load() Dim birth As String Dim year As Integer Dim month As Integer Dim day As String Dim old As Integer Dim season As String Dim sx As Integer Dim fx As String birth = Trim(Str(InputBox("请输入您的生日。格式为19741212"))) year = Val(Left(birth, 4)) month = Val(Mid(birth, 5, 2)) day = Right(birth, 2) old = 2015 - year Select Case month Case Is <= 3 season = "春季" Case Is <= 6 season = "夏季" Case Is <= 9 season = "秋季" Case Is <= 12 season = "冬季" End Select sx = (year - 2016) Mod 12 If sx < 0 Then sx = sx + 12 End If Select Case sx Case 0 fx = "猴" Case 1 fx = "鸡" Case 2 fx = "狗" Case 3 fx = "猪" Case 4 fx = "鼠" Case 5 fx = "牛" Case 6 fx = "虎" Case 7 fx = "兔" Case 8 fx = "龙" Case 9 fx = "蛇" Case 10 fx = "马" Case 11 fx = "羊" End Select MsgBox "您的年龄为:" & old & vbCrLf & "您的出生季节为:" & season & vbCrLf & "您的属相为:" & fx End Sub 我也就是閒着无聊,给这5分都不够敲键盘的 ,

血型对照表?

父母血型可以产生后代血型的所有组合 A+A→A。O, A+B→A。B,O AB! A+O →A O! A+AB→A,B、AB, B+B→B,O。 B+O→B?O。 B+AB→B、A AB O+O→O! O+AB →A。B, AB+AB→AB?AB ?

怎么算多大年龄就知道属相是什么

  最好的办法是拿自己的属相做标准!比方说今年是猴年是你的本命年你是92年出生93年的就是属鸡????的91年就是属羊的只要记住12生肖次序就可以没12年一轮回望采纳!

同属相兔结婚俩人年龄小于3个月怎么就不行了??必须大三个月以上???啥理论这是~~~

  因为他妈妈是关系她的呀!,?   不过你9505呀要证明给她看看她那是封建思想 ~~~~~,

时辰对照表

  子时 23:00-1:00   丑时 1:00-3:00   寅时 3:00-5:00   卯时 5:00-7:00   辰时 7:00-9:00   巳时 9:00-11:00   午时 11:00-13:00   未时 13:00-15:00   申时 15:00-17:00   酉时 17:00-19:00   戌时 19:00-21:00   亥时 21:00-23:00     现发帖的时间是申时、今天是申日、即申1803年申日申时、此三连是几十年一遇:猴年猴日猴时,