Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs) ' Demonstrates box header orientation settings.
Chart.Size = "340x180" Chart.TempDirectory = "temp" Chart.Debug = True Chart.NoDataLabel.Text = "" Chart.DefaultBox.Background.Color = Color.FromArgb(248, 248, 248) Dim a1 As Annotation = New Annotation("Annotation Content") a1.Header.Label.Text = "Top Orientation"
Dim a2 As Annotation = New Annotation("Annotation Content") a2.Header.Label.Text = "Bottom Orientation" a2.Header.Orientation = dotnetCHARTING.Orientation.Bottom
Dim a3 As Annotation = New Annotation("Annotation Content") a3.Header.Label.Text = "Right Orientation" a3.Header.Orientation = dotnetCHARTING.Orientation.Right
Dim a4 As Annotation = New Annotation("Annotation Content") a4.Header.Label.Text = "Left Orientation" a4.Header.Orientation = dotnetCHARTING.Orientation.Left
a1.Position = New Point(120, 20) a2.Position = New Point(115, 110) a3.Position = New Point(230, 40) a4.Position = New Point(20, 40)
Chart.Annotations.Add(a1, a2, a3, a4) End Sub </script>
Previous