| Microsoft Chart Control での凡例関係の設定 |
| 下記サンプルは、必ず、CSVファイルを使っての基本的なグラフの表示 をご覧になってからお試しください。 Private Sub Button3_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button3.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--■ 'デフォルトでは、凡例は右上端に表示されます。(基本的なグラフの表示結果を参照) '従って凡例を非表示にしたい場合は下記の用に Enabled = False に設定する(既定は、True) '.Legends(0).Enabled = False '凡例を非表示にする '独自の凡例を表示したい場合は下記のように書き換える '既定では、CSV ファイルの１行目の項目名が使用される .Series(0).LegendText = "国語の点数" .Series(1).LegendText = "数学の点数" .Series(2).LegendText = "英語の点数" '凡例の垂直方向の表示位置の設定(Near=上端 Center=中央 Far=下端) '但し、Docking プロパティが Top のような場合は、左端、中央、右端 のようになります。 .Legends(0).Alignment = StringAlignment.Center '凡例のドッキング先を設定(Top・Right・Bottom・Left があり既定値は、 Right) .Legends(0).Docking = Docking.Top '凡例のテキストの表示スタイルを設定(Column・Table=複数行で表示 Row=1行で表示 既定値は、Table) '但し、Docking プロパティが Top のような場合は、Table=1行で表示されます。 .Legends(0).LegendStyle = LegendStyle.Table .Legends(0).BorderColor = Color.Red '凡例の枠の線の色 .Legends(0).BackColor = Color.Yellow '凡例のバックカラー .Legends(0).ShadowOffset = 4 '枠に影を付けて立体的に表示 '上記をコメントにするなり、設定値を変更するなりして色々試して見てください。 '又、上記以外の設定については、.Legends(0) のプロパティを調べて見てください。 '■-----------------------------------------------End----■ End With End Sub |
上記コードの実行結果 |