采用VB+mapinfo编写