二个不错的控件：中国地图、农历

ni57 · 发表于 2007-10-6 09:29

谢谢分享

老猴 · 发表于 2007-10-6 10:57

这个控件怎么用呀.有几省的图,点击不会动呀.

如何给每个省加代码呀?让它发生事件呀?

老猴 · 发表于 2007-10-6 18:37

如何完善这个控件呀?不会用呀.请各位老师赐教! 请教这个控件的制作步骤.比如

第1步:

第2步:

第3步:

等.

[此贴子已经被作者于2007-10-6 18:41:09编辑过]

TGB · 发表于 2007-10-7 23:34

ChinaMap.ocx不是免费的，要使用全部功能需要注册
'主要属性：
'    ProvinceCn     ：省份的中文名
'    ProvinceEn     ：省份的英文名
'    ProvinceShort ：省份的中文简称
'    theCapital     ：省会
'
'    BackColor      ：背景颜色
'

'主要方法：
'   SetToolTipText ：自定义各个省份的 ToolTipText

'主要事件：
'    Click
'    MouseDown
'    MouseMove
'    MouseUp

   农历控件为免费控件

主要属性：
BottomBackColor        控件节气显示部分颜色
DateBackColor        控件日期背景颜色
GridLinesColor        日期网格线颜色
SelectColor        当前日期背景色
ShowVerticalGrid    显示垂直方向网格
ShowHorizontalGrid    显示水平方向网格
TitleBackColor        农历日期部分背景色
WeekBackColor        星期部分背景色
Value As Date        日期

GetChineseAnimal(ByVal theDate As Date)        返回日期生肖，参数有效范围 1901-01-01 ~ 2090-12-31
GetChineseDate(ByVal theDate As Date)        返回农历日期，参数有效范围 1901-01-01 ~ 2090-12-31
GetChineseYear(ByVal theDate As Date)        返回农历干支年，参数有效范围 1901-01-01 ~ 2090-12-31
GetChineseMonth(ByVal theDate As Date)        返回农历月分，参数有效范围 1901-01-01 ~ 2090-12-31
GetChineseDay(ByVal theDate As Date)        返回农历日，参数有效范围 1901-01-01 ~ 2090-12-31
GetConstellation(ByVal theDate As Date)        返回星座，参数有效范围 1901-01-01 ~ 2090-12-31
http://www.cciyy.com/cn    sjtuyjc@sohu.com

talentlwz · 发表于 2007-10-8 10:34

学习了

wangjun945 · 发表于 2008-7-23 10:13

谢谢，哈哈，

weist123 · 发表于 2008-10-16 15:08

这里的可能是完全版的中华地图控件。

http://www.51dd.com/SoftView/SoftView_15283.html

[此贴子已经被作者于2008-10-16 15:09:36编辑过]

晕在青天 · 发表于 2008-10-16 20:53

收藏备用，谢谢

ardor · 发表于 2008-11-10 00:27

vb vbvb非常好

rlhades · 发表于 2008-11-10 16:03

bucuo 谢谢楼主

		自动登录	找回密码
密码			免费注册