VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日: 2004/08/18(Wed) 20:54
投稿者long
Eメール
URL
タイトルタブストリップの選択したタブの色を変えるには?

フォームにTabStrip1(0)と(1)の2つを貼り付けていて、現在
下記のようにコードを記述していますが、実行時にそれぞれ
選択したタブの色を青色に変化させることは可能でしょうか?
よろしくお願いします。

' TabStrip1(左・右両チーム選手選択)処理
Private Sub Tabstrip1_Click(Index As Integer)

    Dim I  As Integer

    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
           End With
          
      Case 1
          'TabStrip1(1) Frame2Groupの処理
           With TabStrip1(Index)
               For I = 0 To 14
                   If .SelectedItem.Index - 1 = I Then
                      Frame2(I).ZOrder
                      Frame2(I).Visible = True
                   Else
                      Frame2(I).Visible = False
                   End If
               Next I
           End With
    End Select


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- VBレスキュー(花ちゃん) - - Web Forum -