tagCANDY CGI VBレスキュー(花ちゃん) - VBレスキュー(花ちゃん)の投稿サンプル用掲示板 - Visual Basic 6.0 VB2005 VB2010
VB2005用トップページへVBレスキュー(花ちゃん)のトップページVB6.0用のトップページ
VBレスキュー(花ちゃん)の投稿サンプル用掲示板
     サンプル投稿用掲示板  VB2005 〜 用トップページ  VB6.0 用 トップページ
MSChartでY軸(数値軸)の目盛り線の設定 (VB6.0) ( No.5 )  [親スレッドへ]
日時: 2007/07/26 18:51
名前: 花ちゃん

***********************************************************************************
* カテゴリー:[チャート][][]                                                      *
* キーワード:Y軸(数値軸)の目盛り線の設定                                         *
***********************************************************************************
-----------------------------------------------------------------------------------
投稿者:花ちゃん  MSChartでY軸(数値軸)の目盛り線の設定  2007/07/23
-----------------------------------------------------------------------------------

下記をsChartViewSet() プロシージャ内に追加して下さい。

'★追加部分

'------------------- Y軸(数値軸)の目盛り線の設定  VtChAxisIdY -----------------
   '目盛り線の設定(点数の横線)
   With MSChart1.Plot.Axis(VtChAxisIdY).ValueScale
      .Auto = False                          '自動設定を解除
      .Maximum = 120                         '最大値
      .Minimum = 0                           '最小値
      .MajorDivision = 12                    '目盛り線の数(等分)10点毎
      .MinorDivision = 2                     '補助目盛り線等分   5点毎
   End With

   'メモリの単位が6桁を超えると[1.2e+006]のように表示されますその時は
   '下記のように設定して下さい。
'   MSChart1.Plot.Axis(VtChAxisIdY).Labels.Item(1).Format = "#,###"
'   MSChart1.Plot.Axis(VtChAxisIdY2).Labels.Item(1).Format = "####"
  

   '目盛り線の数値の部分の横線の描き方(グラフ軸の目盛り区分を示すマーカー(太い青色の線))
   With Form1.MSChart1.Plot.Axis(VtChAxisIdY, 1)
      .Tick.Length = 300                     '結果が解り易いように長くしております。
      .Tick.Style = VtChAxisTickStyleOutside '目盛りは軸の外側に表示
      '.Style = VtChAxisTickStyleInside      '目盛りは軸の内側に表示
      .Pen.Width = 50                        '線の太さを設定
      .Pen.VtColor.Set 0, 0, 255             '線の色を設定(青色)
   End With
  
   '目盛り線の数(等分)10点毎 の線の色を設定
   With MSChart1.Plot.Axis(VtChAxisIdY).AxisGrid.MajorPen
      .Width = 40                            '線の太さを設定
      .VtColor.Set 0, 255, 255               '横の線(水色)
   End With
  
   '補助目盛り線の色を設定(5点毎)
   With MSChart1.Plot.Axis(VtChAxisIdY).AxisGrid.MinorPen
      .Width = 20                            '線種によっては変化が少ない場合がある
      .Style = VtPenStyleDotted              '線種を設定(点線)
      .VtColor.Set 255, 0, 255               '補助目盛り線の色を設定(桃色)
   End With
'---------------------------------------------------------------------------------

 Y軸目盛りの区分線・等分線・補助目盛り線 については、下図の実行図で
 位置・呼び名等を確認下さい。
  
 ★上記実行図
 http://hanatyan.sakura.ne.jp/samplepic/Chart003.htm




 [スレッド一覧へ] [親スレッドへ]