ID property
Returns the ID of the specified symbol. Read-only Integer.
Applies to
Objects: Symbol
Syntax
object.ID
Parameters
Part | Description |
---|---|
object | Required. An expression that returns a Symbol object. |
Remarks
The ID property is the default property for the Symbol object.
Example
Sub ChangeDataSetSymbol()
Dim objApp As New MapPoint.Application
Dim objDataSet As MapPoint.DataSet
Dim objSymbols As MapPoint.Symbols
Dim objSym As MapPoint.Symbol
objApp.Visible = True
objApp.UserControl = True
Set objDataSet = objApp.OpenMap(objApp.Path & "\Samples\Clients.ptm").DataSets("Clients")
Set objSymbols = objApp.ActiveMap.Symbols
'Import a custom symbol
Set objSym = objSymbols.Add(objApp.Path & "\Samples\CAirport.bmp")
'Change the symbol of the current data set
objDataSet.Symbol = objSym.ID
End Sub