for (int i = 0; i < 11; i++) { BoxCapStyle bhs = (BoxCapStyle)i; Annotation ann = getNewAnnotation("", bhs); ann.Position = new Point(20 + i * 0, 20 + i * 32); Chart.Annotations.Add(ann);
} }
Annotation getNewAnnotation(string content, BoxCapStyle bStyle) { Annotation an = new Annotation(content); an.Size = new Size(130, 0); an.Header.Label.Text = bStyle.ToString(); an.Header.Label.Font = new Font("Verdana", 10.5f); an.HeaderLabel.Alignment = StringAlignment.Center;
For i As Integer = 0 To 10 Dim bhs As BoxCapStyle = CType(i, BoxCapStyle) Dim ann As Annotation = getNewAnnotation("", bhs) ann.Position = New Point(20 + i * 0, 20 + i * 32) Chart.Annotations.Add(ann)
Next i End Sub
Function getNewAnnotation(ByVal content As String, ByVal bStyle As BoxCapStyle) As Annotation Dim an As Annotation = New Annotation(content) an.Size = New Size(130, 0) an.Header.Label.Text = bStyle.ToString() an.Header.Label.Font = New Font("Verdana", 10.5f) an.HeaderLabel.Alignment = StringAlignment.Center
Previous