出生那年是什么年就属属什么!
2623云里蛟龙,四大吉卦 李居明
可以对应 任何一个属属相 你想问什么、 如果是戊寅年 那对应的就是虎年。四大最惹人喜爱的生肖
完整的是梅傲冬雪独自艳,三遍啼叫五更亮答答案应该是鸡,四大特殊面相
大势至菩萨与观世音菩萨同为西方极乐世界阿弥陀佛之胁侍,为西西方三圣之一、0425是现今在极乐世界。是第二顺位递补阿弥陀佛佛位的菩萨,第一顺位递补是观世音菩萨。《悲华经》的记载。,四大神兽方位
如果出生日期输入格式为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分都不够敲敲键盘的 ,四大美女与生肖
阿弥陀佛是佛祖给大家描绘的极乐世界的教主!,四大财位
随喜赞叹您的精进。曾听闻大德开示如若连及做梦亦不忘却阿弥陀佛、命终决定往生极乐世界。。四大风水事件
可以啊!功德无量! 建议在前面加南无(音拿磨)、是皈依之意、念南无阿弥陀佛!、四大风水名猫阿弥陀佛对应的属相
有影响!佛教不提倡佩戴佛菩萨形象。那些大力宣传佩戴佛像有好6365处的都是些无良商家?四大风水师