你好 朋友、
7805 是看出生的年份
根据出生的农历年份算?、
哪个年都有双鱼座?要看月份 每年的02.19~03.20是双鱼座、!
是是阴历年份、!
qq软件编程人员只是设置了两个项目!3524没有设置关联性?所以这两个是分别选的、就像你的名字和你你的年龄、自己设置什么就是什么,
出生那一年的年年月份。
1984 1996 1972 1960 1948 1936 1924!
Dim Year As Integer Dim Name As Integer Year = Val(InputBox("请输人出生年份:", "生肖查询", 1977)) Label1.Caption = "您是" & Str(Year) + "年出生的生肖为:" Name = Year Mod 12 Select Case Name Case 4 Label2.Caption = "鼠" Case 5 Label2.Caption = "牛" Case 6 Label2.Caption = "虎" Case 7 Label2.Caption = "兔" Case 8 Label2.Caption = "龙" Case 9 Label2.Caption = "蛇" Case 10 Label2.Caption = "马" Case 11 Label2.Caption = "羊" Case 0 Label2.Caption = "猴" Case 1 Label2.Caption = "鸡" Case 2 Label2.Caption = "狗" Case 3 Label2.Caption = "猪" End Select ?属相出生年份对照表
五行(金木水火土)和出生的年!月!日及时间都都有关系。 记得采纳啊,