Pestañas - Determinar la visibilidad y/o posición de una pestaña.

Creado por David Miralpeix, Modificado el Vie, 16 Feb, 2024 a 12:26 P. M. por David Miralpeix

Determinar la visibilidad la pestaña indicada, de forma que se muestre o no.
Si quiero mover de posición la pestaña, debo de usar la propiedad Move del control.

Código VB6:

'Visiblidad
controlPestañas.item(indicePestañaDeseada).visible = False
controlPestañas.item(indicePestañaDeseada).visible = True

'Para seleccionar una pestaña existente:
controlPestañas.item(indicePestañaDeseada).Selected = True

Código C#:

// Visibilidad
controlPestañas.Item(indicePestañaDeseada).Visible = false;
controlPestañas.Item(indicePestañaDeseada).Visible = true;

// Para seleccionar una pestaña existente
controlPestañas.item(indicePestañaDeseada).Selected = true;

Ejemplo de creación de pestaña nueva, ocultar pestañas existentes y seleccionar por defecto la pestaña nueva,

Código VB6:

Sub Show
     'Crear el panel
     Set lPnl = gForm.Controls.Add("Threed.SSPanel", "Pers_MiPanel")
     lPnl.Visible=True 
     lPnl.Object.Caption = ""
     lPnl.autosize = 3 
     'Añado el panel como una pestaña al control Tab.
     gform.controls("TabDatos").InsertItem 100, "Otros", lPnl.Hwnd, 123    

     'Oculto las 2 primeras pestañas
     gForm.Controls("TabDatos").item(0).visible=False
     gForm.Controls("TabDatos").item(1).visible=False

     'Selecciono mi pestaña como principal
     gform.controls("TabDatos").Item(100).Selected = true

     'Posicionar la pestaña en segundo lugar
     gform.controls("TabDatos").Item(100).move 1
     gform.controls("TabDatos").Item(1).move 4
end sub

Código C#:

public void Show()
{
  // Crear el panel
  ICntPanel lPnl = (ICntPanel)gForm.Controls.Add("AhoraOCX.CntPanel", "pers_MiPanel");
  lPnl.Visible = true;
  lPnl.Text = string.Empty;
  lPnl.ResizeEnabled = true;
  lPnl.ResizeInterior = true;

  // Añado el panel como una pestaña al control Tab
  ICntTab tabDatos = (ICntTab)gForm.Controls["TabDatos"];
  tabDatos.InsertItem(100, "Otros", lPnl, 123);

  // Oculto las dos primeras pestañas
  tabDatos.Item(0).Visible = false;
  tabDatos.Item(1).Visible = false;

  // Selecciono mi pestaña como principal
  tabDatos.Item(100).Selected = true;

  // Posicionar la pestaña en segundo lugar
  tabDatos.Item(100).Move(1);
  tabDatos.Item(1).Move(4);

}