Microsoft Chart Control のデータポイントラベルの表示に関する設定 |
下記サンプルは、必ず、CSVファイルを使っての基本的なグラフの表示 をご覧になってからお試しください。 Private Sub Button7_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button7.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--■ For i As Integer = 0 To .Series.Count - 1 With .Series(i) 'データラベルにデータポイントの Y 値を表示 .Label = "#VALY" 'マクロ(キーワード)で指定 注@ 参照 .LabelForeColor = Color.Blue .Font = New Font("MS P明朝", 10, FontStyle.Bold) End With Next '■---------------------------------------------------------------------End----■ '上記基本的な表示設定内のループ内に書いてもOK '.Series(2).Label = "#AVG" 'のように系列個別に指定する事もできます。 '.Series(2).LabelForeColor = Color.Red End With End Sub |
上記コードの実行結果 |
注 @ グラフコントロールのキーワード(実行時に計算値で自動的に置換される文字シーケンス) キーワード 説 明 #VALX データ ポイントの X 値。 #VAL データ ポイントの Y 値。 #SERIESNAME 系列名。 #LABEL データ ポイント ラベル。 #AXISLABEL 軸データ ポイント ラベル。 #INDEX データ ポイントのインデックス。 #PERCENT データ ポイントの Y 値の比率。 #LEGENDTEXT 凡例のテキスト。 #CUSTOMPROPERTY 指定したカスタム属性の値。 #TOTAL 系列のすべての Y 値の合計。 #AVG 系列内のすべての Y 値の平均。 #MIN 系列内のすべての Y 値のうち、最小のデータ ポイント。 #MAX 系列内のすべての Y 値のうち、最大のデータ ポイント。 #FIRST 系列内のすべての Y 値のうち、最初のデータ ポイント。 #LAST 系列内のすべての Y 値のうち、最後のデータ ポイント。 |
2011/04/25
VBレスキュー(花ちゃん)
Visual Basic6.0
VB6.0
VB.NET2003/VB2005/VB2008/VB2010