Visual basic 2008 Herramienta TabControl1 Creacion de TabPage [Ares]

lunes, 31 de enero de 2011

Herramientas:

1- TabControl
2- Buttons

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        TabControl1.TabPages.Add("Nombre del titulo del tab")
    End Sub

Copiar Codigo

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click<br /> TabControl1.TabPages.Add("Nombre del titulo del tab")<br /> End Sub

Eliminar TabPages en Rotacion
*Agregamos un Button

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        If TabControl1.TabCount = 1 = False Then
            TabControl1.TabPages.RemoveAt(TabControl1.SelectedIndex)
        End If
    End Sub


Copiar Codigo
If TabControl1.TabCount = 1 = False Then<br /> TabControl1.TabPages.RemoveAt(TabControl1.SelectedIndex)<br /> End If)<br /> End Sub