è un pezzo che non uso quel controllo. Vedi se la procedura di sotto, tratto da un vecchio esercizio, ti può servire
codice:Protected Sub CreaGrafico() Dim c As Chart = Me.Chart1 Dim a As ChartArea = c.ChartAreas(0) Dim s As Series = c.Series(0) Dim lg As Legend = c.Legends(0) 'databind Dim dv As DataView = msole.GetDataView(gl.StringaConnessioneTest, "SELECT * from grafico2") 's.Points.DataBind(dv, "x", "y", Nothing) For Each r As DataRowView In dv Dim p As New DataPoint(CDbl(r("x")), CDbl(r("y"))) p.IsEmpty = Not CBool(r("valido")) s.Points.Add(p) Next 'tipo di grafico s.ChartType = SeriesChartType.Spline 'nome della serie dati s.Name = "Ossidi di Azoto (ppm)" 'strip line Dim stripLine As New StripLine() stripLine.BackColor = Color.FromArgb(245, 236, 217) stripLine.Interval = 6 stripLine.IntervalOffset = 1 stripLine.StripWidth = 3 a.AxisX.StripLines.Add(stripLine) 'marker s.MarkerStyle = MarkerStyle.Circle s.MarkerSize = 4 s.MarkerColor = Color.Black 'spessore linea s.BorderWidth = 1 End Sub

è un pezzo che non uso quel controllo. Vedi se la procedura di sotto, tratto da un vecchio esercizio, ti può servire
Rispondi quotando