Microsoft Chart Control で棒グラフの棒の幅を設定する

下記サンプルは、必ず、CSVファイルを使っての基本的なグラフの表示 をご覧になってからお試しください。 Private Sub Button25_Click(ByVal sender As System.Object, _                            ByVal e As System.EventArgs) Handles Button25.Click 'Microsoft Chart Control の棒グラフの棒の幅を設定    Call ChartClar(Chart1)  '設定を一旦初期値に戻す。(通常は必要ありません。)    With Chart1       For i As Integer = 1 To colums          Dim columnName As String = ds.Tables(0).Columns(i).ColumnName.ToString()          '系列の設定(国語・数学等)          .Series.Add(columnName)          'グラフの種類を縦棒グラフに設定          .Series(columnName).ChartType = DataVisualization.Charting.SeriesChartType.Column          'X 軸のラベルテキストの読込・設定(浅野等の氏名)          .Series(columnName).XValueMember = ds.Tables(0).Columns(0).ColumnName.ToString()          'グラフ用のデータの読込・設定(点数)          .Series(columnName).YValueMembers = columnName       Next '------------- ここまでは、基本的な表示設定と同じ -----------------------------------------       '■------------------- 棒の幅を設定 ----------------Start--■       'データポイントの幅を指定する       .Series(0)("PointWidth") = "1.0"       .Series(1)("PointWidth") = "0.8"       .Series(2)("PointWidth") = "0.5"       '設定値は、0 〜 2 の範囲で、1 以上は重なる（既定値は 0.8）       '■-------------------------------------------------End----■    End With End Sub

上記コードの実行結果

2011/06/03

VBレスキュー(花ちゃん)
Visual Basic6.0　 VB6.0
VB.NET2003/VB2005/VB2008/VB2010