求用vb做万年历 要求输入一个日期 得到星期节日星座节气

分数太少了，呵呵，呵呵
另外的农历，是更好地做

用的printf打印功能目录，切换来完成调用子函数很多次了，再加上大循环

日历显示，这是相对简单的，是计算的一年的第一天是星期可以
原则：第1年1月1日（星期一），计算这天的第一天，年1月1日，1的ad，除以7的中间的，其余的是周。一年365天，364正好是7的倍数，那么一年更比一天，闰年加一天。还有一个更简单，仅有400年是一个轮回，400 +97 = 497多
您输入的一年，除以400，计算，然后在今年剩下的天数计算量会小很多
所以在今年的第一天是星期计算
最好做的一个子功能来实现这一功能，返回值是今年的几个星期的第一天，后者可用于

下一个打印子功能是一个不错的选择，
设置一个全局数组包含该月的天数来确定一个，如果在2月的天数 br />这里有一个技巧，就是设定一个变量来保存每月的最后一天，一周，因为它是连续的，所以在下个月的第一天是星期几被很好地定义，是打印几个空格发生这个变量的值，哦

日期星期有几个还不错的事，知道在今年的第一天，然后是一周的第一天的日期，今年的差一些美好的一天，使用for循环，可以计算出

农历这做的不好，你可以看看，一种子功能，您可以参考 a>
后面两个函数，读取和写入文件，很简单，套用固定格式的文件可以变化不大，