tagCANDY CGI VBレスキュー(花ちゃん) - VBレスキュー(花ちゃん)の投稿サンプル用掲示板 - Visual Basic 6.0 VB2005 VB2010
VB2005用トップページへVBレスキュー(花ちゃん)のトップページVB6.0用のトップページ
VBレスキュー(花ちゃん)の投稿サンプル用掲示板
     サンプル投稿用掲示板  VB2005 〜 用トップページ  VB6.0 用 トップページ
棒グラフの棒の内部色を設定(VB6.0) ( No.15 )  [親スレッドへ]
日時: 2007/07/26 15:30
名前: 花ちゃん

***********************************************************************************
* カテゴリー:[チャート][][]                                                      *
* キーワード:棒グラフの棒の内部色を設定                                          *
***********************************************************************************
-----------------------------------------------------------------------------------
投稿者:花ちゃん  MSChartで棒グラフの棒の内部色を設定  2007/07/25
-----------------------------------------------------------------------------------

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

 '★追加部分

'---------------------- 棒グラフの棒の内部色を設定 ----------------------
    
   With MSChart1.Plot.SeriesCollection(1).DataPoints(-1).Brush
      'ブラシタイプを設定します。(国語だけ設定)
      .Style = VtBrushStylePattern        'ビットマップ パターン ブラシ
      'ブラシで使用されるパターンまたはハッチングを設定します。
      .Index = VtBrushPatternChecks       'チェック模様
      .PatternColor.Set 255, 255, 255     '白色の部分
   End With

   With MSChart1.Plot.SeriesCollection(3).DataPoints(-1).EdgePen
      '縁の線種を設定(反映されない)
      .Style = VtPenStyleDotted
      '系列の線 / ふちの幅の設定(英語だけ太く設定)
      .Width = 40
      '系列の線 / ふちの色の設定(英語だけ赤色に設定)
      .VtColor.Set 255, 0, 0
   End With
'---------------------------------------------------------------

★ くどいようですが、系列内の個々のデータに対しての設定は出来ません。
 

 ★上記実行図
 http://hanatyan.sakura.ne.jp/samplepic/chartno15-1.gif



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