阳历与农历的转换是否有规则可循？

在网上搜了一下，找了一些阳历转农历并有二十四节气的代码，而所有找到的代码都是定义到一定的时间范围内，比如2010年或2100等等，这些代码大致的过程是把一些转换需要的数据存在数组中，然后调用。而VB支持的阳历日期可以支持到9999年，如IsDate("9999-9-30")可以返回True，那么有没有什么方法可以转换更多的农历日期？也就是说，在VB中给出一个VB可以识别的阳历日期，就可以将其转为农历，并给出节气？不会需要把好几千年的数据也存入数组吧。