Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs) ' Demonstrates creating a chart that draws only an annotation.
Chart.TempDirectory = "temp" Chart.Debug = True Chart.Size = "200x50" ' Create the annotation. Dim an As Annotation = New Annotation("This is an annotation chart <Chart:Column values='5,4,3,5,6,5,7'>") an.DynamicSize = False an.Size = New Size(200, 50) an.Background.Color = Color.GreenYellow an.Background.ShadingEffectMode = ShadingEffectMode.Background2
' Use the annotation to create the chart. Chart.ObjectChart = an
Previous