| Microsoft Chart Control でカスタム属性を使って描画 |
| 下記サンプルは、必ず、CSVファイルを使っての基本的なグラフの表示 をご覧になってからお試しください。 Private Sub Button13_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button13.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)("DrawingStyle") = "Cylinder" .Series(1)("DrawingStyle") = "Emboss" .Series(2)("DrawingStyle") = "Wedge" '■-------------------------------------------------------------End----■ End With |
上記コードの実行結果 |
|
カスタムプロパティの特性
適用可能なグラフの種類 横棒、縦棒、積み上げ横棒、100% 積み上げ横棒、積み上げ縦棒、 100% 積み上げ縦棒、範囲横棒、範囲縦棒 適用可能なグラフ要素 Series, DataPoint
値の範囲 Cylinder , Emboss, LightToDark, Wedge, Default
既定値 Default
2D または 3D 2D、3D
|