How to change the point annotation location from the default for point chart

Question

Hi,

How to change the point annotation location from the default for point chart.

For Findex As Integer = 0 To MyAnnos.Count - 1                         
Dim PC As New TextAnnotation                         
With PC                             
.ForeColor = Color.Red                             
.Font = New Font("Tahoma", 10)                             
.AnchorDataPoint = Chart1.Series("Interaction Diagram3").Points(MyAnnos(Findex).SeriesFindex)                             
.X = Chart1.Series("Interaction Diagram3").Points(MyAnnos(Findex).SeriesFindex).XValue                             .Y = Chart1.Series("Interaction Diagram3").Points(MyAnnos(Findex).SeriesFindex).YValues(0)                             .Text = MyAnnos(Findex).MTindex.ToString & " " & PC.AnchorDataPoint.ToString                             Chart1.Annotations.Add(PC)                         
End With                     
Next

Answer 1

Hi @Hany Metry ,

Modify the X and Y coordinates of the TextAnnotation then add it into your chart.

For Findex As Integer = 0 To MyAnnos.Count - 1
    Dim PC As New TextAnnotation()
    With PC
        .ForeColor = Color.Red
        .Font = New Font("Tahoma", 10)
        .AnchorDataPoint = Chart1.Series("Interaction Diagram3").Points(MyAnnos(Findex).SeriesFindex)
        
        .X = Chart1.Series("Interaction Diagram3").Points(MyAnnos(Findex).SeriesFindex).XValue + 0.5
        .Y = Chart1.Series("Interaction Diagram3").Points(MyAnnos(Findex).SeriesFindex).YValues(0) + 10

        .Text = MyAnnos(Findex).MTindex.ToString() & " " & PC.AnchorDataPoint.ToString()
        Chart1.Annotations.Add(PC)
    End With
Next

Best Regards.

Jiachen Li

---

If the answer is helpful, please click "Accept Answer" and upvote it.

Note: Please follow the steps in our documentation to enable e-mail notifications if you want to receive the related email notification for this thread.