I had much the same problem using addPushpin for a whole bunch of pushpins. On my dev machine, adding about 3000 pushpins (from my db) used to take between 90 and 120 seconds.

What I now do is to export my data into a CSV (with 3 columns - Latitude,Longitude,Name) and then use the ImportData method:-

Dim ds As MapPoint.DataSet
ds = Map.DataSets.ImportData(Filename)
ds.Symbol = 1 [or whatever symbol you want]

The same 3000 pushpins now take about 3 seconds to load!

John

__________________
John Lewis