Vista la rappresentazione grafica, per semplificare il tutto, ti conviene utilizzare il componente MSChart1 ed impostarlo sul tipo "a dispersione", nascondendo le linee e visualizzando gli indicatori, come segue:

codice:
Private Sub Command1_Click()
    Dim serX As Series
   ' Visualizza gli indicatori e nasconde le linee per
   ' tutte le serie:
   MSChart1.chartType = VtChChartType2dLine
   For Each serX In MSChart1.Plot.SeriesCollection
      serX.SeriesMarker.Show = True
      serX.ShowLine = False
   Next
End Sub
Per cambiare colore agli indicatori dei dati, vedi la proprietà .DataPoints