NewDataSet event
Occurs after a new data set is created.
Applies to
Objects: Map, MappointControl
Syntax
object.NewDataSet(NewDataSet)
Parameters
Part |
Description |
---|---|
object |
An expression that evaluates to a Map or MappointControl object. |
NewDataSet |
DataSet object. Data set just created. |
Remarks
- Do not make this event infinitely recursive by calling itself or causing itself to be called.
Example
Dim WithEvents objApp As MapPoint.Application
Dim WithEvents objMap As MapPoint.Map
Private Sub Command1_Click()
objMap.DataSets.AddPushpinSet "New Pushpin Set"
End Sub
Private Sub Form_Load()
'Set up the application
Set objApp = CreateObject("mappoint.application")
Set objMap = objApp.ActiveMap
objApp.Visible = True
objApp.UserControl = True
End Sub
Private Sub objMap_NewDataSet(ByVal NewDataSet As MapPoint.DataSet)
MsgBox "NewDataSet event fired."
End Sub