Microsoft Chart Control の外観及び背景色の設定 |
下記サンプルは、必ず、CSVファイルを使っての基本的なグラフの表示 をご覧になってからお試しください。 Private Sub Button2_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button2.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 '■- 内が今回のサンプル実行の為の追加コード部分 '■------------------- Chartコントロールの外形を設定 ----------------Start--■ .BorderSkin.SkinStyle = BorderSkinStyle.Emboss 'グラフエリアの外観の設定 .BackColor = Color.Yellow 'グラフエリアの背景色の設定 .ChartAreas(0).BackColor = Color.MistyRose 'プロットエリアの背景色の設定 '又は、下記のようにプロシージャに書いておき必要時に呼び出す。(別添参照) 'SetChartStyle(Chart1, BorderSkinStyle.Emboss, Color.Yellow, Color.MistyRose) '■------------------------------------------------------------------End----■ End With End Sub 別添 'このサンプル以降も必要によりこのようなプロシージャにまとめて書いてみてください。 Private Sub SetChartStyle(ByVal Cht As Chart, ByVal bsstyle As BorderSkinStyle, _ ByVal bakcolor As Color, ByVal areColor As Color) With Cht .BorderSkin.SkinStyle = bsstyle 'グラフエリアの外観の設定 .BackColor = bakcolor 'グラフエリアの背景色の設定 .ChartAreas(0).BackColor = areColor 'プロットエリアの背景色の設定 End With End Sub |
上記コードの実行結果 |
BorderSkinStyle は、上記の Emboss 以外にも下記のような形状が設定できますので試してみてください。 メンバー名 説 明 None 境界線スキンを使用しません。 Emboss エンボス境界線スキンを使用します。 Raised 浮き出た外観の境界線スキンを使用します。 Sunken くぼんだ外観の境界線スキンを使用します。 FrameThin1 角が丸い細い境界線スキンを使用します。 FrameThin2 上部の角が丸い細い境界線スキンを使用します。 FrameThin3 角が直角の細い境界線スキンを使用します。 FrameThin4 外側の角が直角で内側の角が丸い、細い境界線スキンを使用します。 FrameThin5 ねじが示された、角が丸い細い境界線スキンを使用します。 FrameThin6 内側の角が直角で外側の角が丸い、細い境界線スキンを使用します。 FrameTitle1 角が丸い境界線スキンを使用します。 FrameTitle2 上部の角が丸い境界線スキンを使用します。 FrameTitle3 角が直角の境界線スキンを使用します。 FrameTitle4 内側の角が丸く外側の角が直角の境界線スキンを使用します。 FrameTitle5 ねじが示された、角が丸い境界線スキンを使用します。 FrameTitle6 外側の角が丸く内側の角が直角の境界線スキンを使用します。 FrameTitle7 角が丸い境界線スキンを使用します。 右側には境界線は表示されません。 FrameTitle8 上部および下部のみの角が丸い境界線スキンを使用します。 |
2011/04/25
VBレスキュー(花ちゃん)
Visual Basic6.0
VB6.0
VB.NET2003/VB2005/VB2008/VB2010