|
分類:[VB.NET/VB2005 以降]
このCharに表示がされてる折れ線を消す方法を教えてください。
よろしくお願いします。
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim dat As DataTable = New DataTable
With dat.Columns
.Add("件数", GetType(Integer))
.Add("数量", GetType(Integer))
End With
For i = 0 To 100
dat.Rows.Add(i, i * 10)
Next
Chart1.DataSource = dat
Chart1.Series.Clear()
Dim oresen = Chart1.Series.Add("折れ線")
With oresen
.ChartType = DataVisualization.Charting.SeriesChartType.Line
.XValueMember = "件数"
.YValueMembers = "数量"
.IsVisibleInLegend = False
End With
End Sub
|