用VB设计可以显示农历的日历

下一页 1 2 

　　 
　　大家都知道，Windows系统中的日历，并没有显示农历的功能，这对于那些喜欢查农历的朋友来说就显得有点儿不太方便了，所以笔者想借助一个第三方农历控件来制作显示农历功能的日历。

（控件地址：http：//member.netease.com/jackyyin/download/calendar_ocx.zip）。



　　一、添加控件

　　在利用农历控件进行编程之前，我们首先要将它加载到我们的VB当中。现在，打开VB6.0，单击“工程”下拉菜单下的“部件”子菜单，选择“控件”选项，接着单击“浏览”，将它添加到列表当中，最后选中它。

图1

　　接下来，我们先来了解一下它有哪些属性，这样有助于我们后面的使用。该控件的主要属性如下：

　　ChineseAnimal：用于显示农历中的生肖。
　　ChineseDate：用于显示农历中的日期。
　　ChineseDateType：用于显示农历日期的类型。如果将它赋值为0，将以字符类型返回农历日期；如果将它赋值为“1”，则以字符类型返回农历日期。
　　ChineseGanZhi：用于显示农历中的干支。
　　ChineseSolarTerm：用于显示农历中的节气。
　　DateNow：用于设置农历控件的日期。

原文转自：http://www.ltesting.net