文件名称:99
- 所属分类:
- GIS编程
- 资源属性:
- [Windows] [Visual C] [Basic/ASP] [源码]
- 上传时间:
- 2012-11-26
- 文件大小:
- 1kb
- 下载次数:
- 0次
- 提 供 者:
- c*
- 相关连接:
- 无
- 下载说明:
- 别用迅雷下载,失败请重下,重下不扣分!
介绍说明--下载内容均来自于网络,请自行研究使用
地理信息系统,基于VB开发,实现地图放大,漫游-Dim i As Integer
For i = 0 To Map1.Layers.Count- 1
If Map1.Layer(i).LayerType = moMapLayer Then
If Map1.Layer(i).shapeType = moPoint Then
MsgBook "Layer number" & i & "is a map layer and contains points."
ElseIf Map1.Layer(i).shapeType = moLine Then
MsgBook "Layer number" & i & "
For i = 0 To Map1.Layers.Count- 1
If Map1.Layer(i).LayerType = moMapLayer Then
If Map1.Layer(i).shapeType = moPoint Then
MsgBook "Layer number" & i & "is a map layer and contains points."
ElseIf Map1.Layer(i).shapeType = moLine Then
MsgBook "Layer number" & i & "
(系统自动生成,下载前可以参看下载内容)
下载文件列表
99\2.vbp
..\工程2.vbw
99
..\工程2.vbw
99