سلام آیا به این شکل هم میشه اجرا کرد ؟
Private TabBackColor As Color = <YourColor>
Private TabForeColor As Color = <YourForeColor>
Private Sub TabControl1_DrawItem(sender As System.Object, e As System.Windows.Forms.DrawItemEventArgs) Handles TabControl1.DrawItem
If e.Index = Me.TabControl1.SelectedIndex Then
e.Graphics.FillRectangle(New SolidBrush(TabForeColor), e.Bounds.X - 2, e.Bounds.Y - 2, e.Bounds.Width + 2, e.Bounds.Height + 2)
Else
e.Graphics.FillRectangle(New SolidBrush(TabBackColor), e.Bounds.X - 2, e.Bounds.Y - 2, e.Bounds.Width + 2, e.Bounds.Height + 2)
End If
e.Graphics.DrawString(Me.TabControl1.TabPages(e.In dex).Text, e.Font, Brushes.Black, e.Bounds.X + 5, e.Bounds.Y + 5)
End Sub