|
分類:[VB.NET/VB2005 以降]
VB2017です。
すみません。調べたのですが出てきません。
このチャートの折れ線を「破線」などに変えたいです。
よろしくお願いします。
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
|