asked on
AxMappointControl1.NewMap(MapPoint.GeoMapRegion.geoMapNorthAmerica) ' start new map
' ***
' address (variable) is defined here...figured you didn't need to see the code for that, and placed into a variable named 'address'
' ***
' plot this address onto the map
Dim oPushPin As MapPoint.Pushpin
Dim oMap As MapPoint.Map
oMap = GetObject(, "MapPoint.Application").ActiveMap
oPushPin = oMap.AddPushpin(oMap.FindResults(address)(1), "some text here") ' set pushpin to the current customer street address
oPushPin.Location.GoTo() ' zoom in on last pushpin drawn