idsmapseries.cls
来自「一个不错的插件」· CLS 代码 · 共 52 行
CLS
52 行
VERSION 1.0 CLASS
BEGIN
MultiUse = -1 'True
Persistable = 0 'NotPersistable
DataBindingBehavior = 0 'vbNone
DataSourceBehavior = 0 'vbNone
MTSTransactionMode = 0 'NotAnMTSObject
END
Attribute VB_Name = "IDSMapSeries"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = True
' Copyright 2006 ESRI
'
' All rights reserved under the copyright laws of the United States
' and applicable international laws, treaties, and conventions.
'
' You may freely redistribute and use this sample code, with or
' without modification, provided you include the original copyright
' notice and use restrictions.
'
' See use restrictions at /arcgis/developerkit/userestrictions.
Option Explicit
Public Property Get PageCount() As Long
End Property
Public Property Get Page(Index As Long) As IDSMapPage
End Property
Public Property Let EnableSeries(ByVal vdata As Boolean)
End Property
Public Property Get EnableSeries() As Boolean
End Property
Public Sub AddPage(ByVal Page As IDSMapPage)
End Sub
Public Sub RemovePage(Index As Long)
End Sub
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?