- 日時： 2010/03/10 18:49
- 名前： 花ちゃん
- ***********************************************************************************
* カテゴリー：[チャート][描画・画像][] *
* キーワード：Microsoft Chart Controls,凡例関係の設定 *
***********************************************************************************
投 稿 日 ： 2010/03/10
投 稿 者 ： 花ちゃん
Private Sub Button9_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles Button9.Click
'９．凡例関係の設定
Call ChartClar(Chart1) '設定を一旦初期値に戻す。(通常は必要ありません。)
With Chart1
.Series.Clear() '系列を初期化
For i As Integer = 1 To colums
Dim columnName As String = ds.Tables(0).Columns(i).ColumnName.ToString()
'系列の設定(国語・数学等)
.Series.Add(columnName)
'X 軸のラベルテキストの読込・設定(浅野等の氏名)
.Series(columnName).XValueMember = ds.Tables(0).Columns(0).ColumnName.ToString()
'グラフ用のデータの読込・設定(点数)
.Series(columnName).YValueMembers = columnName
Next
'■------------------- 凡例の設定 ----------------Start--■
.Series(0).LegendText = "国語の点数" '独自の凡例を設定する
.Series(1).LegendText = "数学の点数" '独自の凡例を設定する
.Series(2).LegendText = "英語の点数" '独自の凡例を設定する
.Legends(0).Alignment = StringAlignment.Near '凡例の縦方向の表示位置
.Legends(0).BorderColor = Color.Red '凡例の枠の線の色
.Legends(0).BackColor = Color.Yellow '凡例のバックカラー
.Legends(0).Docking = Docking.Top '凡例の横方向の表示位置
.Legends(0).ShadowOffset = 4 '枠に影を付けて立体的に表示
' .Legends(0).Enabled = False '凡例を非表示にする
'上記以外の設定については、.Legends(0) のプロパティを調べて見て下さい。
'■-----------------------------------------------End----■
End With
End Sub
|
Chartコントロール(VB2008版)で凡例関係の設定(VB.NET)