投稿日	： 2004/08/20(Fri) 18:55
投稿者	： long
Ｅメール	：
ＵＲＬ	：
タイトル	： Re^6: タブストリップの選択したタブの色を変えるには？

魔界に仮面弁士さん、回答ありがとうございます。

> 解除する場合は、False を代入しましょう。

上記のご指摘通りにコードを下記に加えて記述してみましたが、
以下のコードだと一方ではTrue、もう一方ではFalseということ
もあり、実行すると即「実行時エラー35600」が出てFalseの行
が黄色で反転表示となりました。
どうかよろしくお願いします。

Select Case Index
      Case 0
          'TabStrip1(0) Frame1Groupの処理
           With TabStrip1(Index)
               For I = 0 To 14
                   If .SelectedItem.Index - 1 = I Then
                      Frame1(I).ZOrder
                      Frame1(I).Visible = True
                   Else
                      Frame1(I).Visible = False
                   End If
               Next I
              
               'TabStrip1(0)の選択タブのハイライト表示
               For m = 0 To 14
                   If .SelectedItem.Index = m Then
                        .Tabs(m).HighLighted = True
                   Else
                        .Tabs(m).HighLighted = False
                   End If
               Next m
           End With

★ - タブストリップの選択したタブの色を変える.. - long 08/18-20:54No.33
• Re: タブストリップの選択したタブの色を変.. - これ 08/20-14:34 No.64
  • Re^2: タブストリップの選択したタブの色を.. - long 08/20-15:32 No.65
    • Re^3: タブストリップの選択したタブの色を.. - 魔界の仮面弁士 08/20-15:55 No.66
      • Re^4: タブストリップの選択したタブの色を.. - long 08/20-17:34 No.69
        • Re^5: タブストリップの選択したタブの色を.. - 魔界の仮面弁士 08/20-18:15 No.70
          • Re^6: タブストリップの選択したタブの色を.. - long 08/20-18:55 No.71
            • 解決しました。 - long 08/20-20:46 No.72
    • Re^3: タブストリップの選択したタブの色を.. - これ 08/20-17:33 No.68
      • 解決しました。 - long 08/20-20:47 No.73