Кнопка закрытия вкладки TabControl - Visual Basic .NET

Узнай цену своей работы

Формулировка задачи:

Привет всем! Подскажите, может кто сталкивался... Очень нужно разместить в своей программе на вкладках TabControl как бы кнопочку закрытия вкладки, как у браузеров. Возможно ли это? Спасибо!

Решение задачи: «Кнопка закрытия вкладки TabControl»

textual
Листинг программы
Public Class Form1
 
    Private Sub TabControl1_SelectedIndexChanged(sender As Object, e As System.EventArgs) Handles TabControl1.SelectedIndexChanged
        Call AddPage()
    End Sub
 
    Private Sub AddPage()
        Dim Page As TabPage
        If TabControl1.SelectedIndex = TabControl1.TabPages.Count - 1 Then
            Page = TabControl1.TabPages(TabControl1.TabPages.Count - 1)
            TabControl1.TabPages(TabControl1.TabPages.Count - 1).Text = "ТавPage" & TabControl1.SelectedIndex
            TabControl1.TabPages.Add(New TabPage)
            TabControl1.TabPages(TabControl1.TabPages.Count - 1).Text = "Еще…"
        End If
    End Sub
 
    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        Call AddPage()
    End Sub
 
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Dim I As Integer = TabControl1.SelectedIndex
        TabControl1.TabPages.RemoveAt(I)
        If I > 0 Then
            TabControl1.SelectedIndex = I - 1
        End If
    End Sub
 
End Class

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

14   голосов , оценка 3.786 из 5