完整的代码,很好的学习的材料地理信息系统二次开发实例教程VB与Mapobject