- 日時： 2010/03/11 06:49
- 名前： 花ちゃん
- ***********************************************************************************
* カテゴリー：[チャート][描画・画像][] *
* キーワード：Microsoft Chart Controls,マーカの設定 *
***********************************************************************************
投 稿 日 ： 2010/03/10
投 稿 者 ： 花ちゃん
Private Sub Button12_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles Button12.Click
'12．マーカの設定
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)
'X 軸のラベルテキストの読込・設定(浅野等の氏名)
.Series(columnName).XValueMember = ds.Tables(0).Columns(0).ColumnName.ToString()
'グラフ用のデータの読込・設定(点数)
.Series(columnName).YValueMembers = columnName
'折れ線グラフ
.Series(i - 1).ChartType = DataVisualization.Charting.SeriesChartType.Line
Next
'■------------------- マーカーの設定 ----------------Start--■
.Series(0).MarkerStyle = MarkerStyle.Star5 'マーカーの種類を指定
.Series(0).MarkerSize = 15 'マーカーの大きさを指定
.Series(0).MarkerColor = Color.Gold 'マーカーのカラーを設定
'小さな画像ファイルを準備しておいて下さい。
.Series(1).MarkerImage = "Marker.png" '指定の画像をマーカーに
.Series(1).MarkerStyle = MarkerStyle.Circle
.Series(2).MarkerStyle = MarkerStyle.Triangle
.Series(2).MarkerSize = 10 'マーカーの大きさを指定
'■---------------------------------------------------End----■
End With
End Sub
上記実行図
http://hanatyan.sakura.ne.jp/chart/chart12.png
|
Chartコントロール(VB2008版)でマーカの設定(VB.NET)