Member 10974007 Ответов: 1

Измените задний цвет страницы вкладки evey

Dim TControl As Control

If (TypeOf TControl Is TabControl) Then

   If (TypeOf TControl Is TabPage) Then
    TControl.BackColor = color.red 
    End If
  End If


Что я уже пробовал:

ну мне нужно в туалет вот так
вкладка(я).страницы(Дж). цвет фона = цвет.красный
но Тинс не работает ...

1 Ответов

Рейтинг:
2

OriginalGriff

Я не удивлен: посмотрите на иерархические диаграммы для TabPage и TabControl:
Класс TabPage (System.Окна.Формы)[^]

System.Object
  System.MarshalByRefObject
    System.ComponentModel.Component
      System.Windows.Forms.Control
        System.Windows.Forms.ScrollableControl
          System.Windows.Forms.Panel
            System.Windows.Forms.TabPage

Класс TabControl (System.Окна.Формы)[^]
System.Object
  System.MarshalByRefObject
    System.ComponentModel.Component
      System.Windows.Forms.Control
        System.Windows.Forms.TabControl

И то, и другое происходит от контроля, но ни то, ни другое не происходит от другого.
Так что если TypeOf TControl является TabPage тогда это не TabControl и наоборот. Ваша линия:
TControl.BackColor = color.red
Никогда не исполнит.