1 - Descripción del Control de
El control de pestañas de diálogo, también denominado SSTab, Que es muy Parecido al Que Nos Presenta el cuadro de Diálogo de Propiedades de Pantalla de Windows de CUANDO presionamos el boton derecho en el Escritorio, estafadores "CONSTA DE UNA Interfaz pestañas ", en La que Cada Una de ellas nos Sirve Parr Mostrar Una opción Determinada.
Cada Pestaña Florerias del Contener SUS Propios Controles Y Es Una buena opción Parr PRESENTAR interfases de Uña-forma Organizada. Cada Pestaña Actua Como contenedor de insertamos los Controles Que
Para incorporarlo un proyecto lo ONU DEBEMOS Buscas? Busca Otros o Anadir Bajo el nombre de Microsoft Tabbed Dialog Control 6.0 desde la Opción Buscas? Busca Otros Componentes del menú de Muestra de Como Visual Basic el siguiente gráfico:
Ventana de Componentes de Visual Basic
Una ves añadido el control, se visualizará con el siguiente ícono:
2 - Página de propiedades
Para acceder a este this las propiedades mas Importantes del SSTab, Podemos utilizar el cuadro de Diálogo " Custom "o personalizado, desde la ventana de propiedades de Visual Basic.
O también Parr acceder a este this Dicha Ventana Podemos Seleccionar el Diálogo con pestañas y con el boton Derecho Elegir la Opción Propiedades
En Cada Pestaña del mando de Podemos colocar Controles y Estós funcionarán de Manera Normales, lo Como Hacen siempre, y al colocarlos En Cada Pestaña estaran Contenidos Dentro De Estas.
Insertar el control de la ONU Para Dentro De Una Pestaña solo hay Que dibujarlo Dentro y ya contenido Quedará, De Igual Manera Una como se hace en el de control de la ONU por PictureBox EJEMPLO.
Apenas insertamos el TabbedDialog en el Formulario, esta Presenta 3 pestañas POR Defecto.
Buscas Para? Busca Otros o especificar la ascenderá de here Que Queremos utilizar el parrafo, Se Puede Hacer de El Cuadro de Diálogo "Custom" "en la Opción contador "como esta en la imagen:
También Se Puede especificar las pestañas Una utilizar, desde la ventana de propiedades de Visual Basic en la propiedad " here "indicando ONU numérico valor Parr El Mismo.
importanete : Si Nosotros HEMOS Agregado pestañas al mando y le HEMOS insertado Controles ONU Alguna de ellas y LUEGO Queremos ELIMINAR Alguna Pestaña, Hay Que anteriormente Borrarse los Controles de las pestañas o eliminarlos, ya Que Si estan Contenidos no lo permite.
3 - Propiedad Orientación y Estilo
Estas son dos Propiedades Importantes referidas Disposición al Aspecto gráfico del Tabbed Dialog ya su.
Propiedad Estilo
Esta Florerias TENER 2 Valores, ssStylePropertyPage o ssStyleTabbedDialog
Una vista de ESTAS 2 propiedades:
La propiedad Orientación
Establece la Orientación y la Disposición de las pestañas en el control de de el, es Decir la alineación.
Los Valores Tener Florerias Que Son ssTabOrientationTop (pestañas arriba), ssTabOrientationLeft (Izquierda), ssTabOrientationRight (Derecha) y ssTabOrientationBottom (abajo)
Una vista de Estas Estas cuatro de Opciones:
Nota : Para Poder utilizar las pestañas con la propiedad Orientación es ssTabOrientationLeft y ssTabOrientationRight, el tipo de fuente Que Dębe Tener configurado el TabbedDialog Dębe Ser Una fuente de tipo TrueType , de lo contrario se visualizará de forma Incorrecta.
4 - Otras propiedades del Diálogo con pestañas
TabsPerRow
Devuelve o Establece el Número de fichas Cada fila de SSTab Control de de la ONU.
Florerias del USAR esto junto con la propiedad here En Tiempo de diseño Parr determinar S. S. El Número de filas Que Aparecen en el control de Propiedad de el. En Tiempo de Ejecución, utilice la propiedad Filas.
TabHeight
Devuelve o Control Establece el alto de Todas las Fichas de SSTab de la ONU.
TabMaxWidth
Devuelve o Establece el Máximo ancho de Cada ficha
Nota: Cuando El valor de la propiedad Style es ssStyleTabbedDialog y el de TabMaxWidth es cero (0), el control el el SSTab ajusta automaticamente el Tamaño de las fichas, SEGÚN el valor de la propiedad TabsPerRow, Parr ajustarlas por igual al control.
Si Selecciona el valor ssStylePropertyPage en la propiedad Style, se Pasará por alto la propiedad TabMaxWidth. En Este Caso, el ancho de Cada ficha se ajusta automaticamente a la longitudinal del texto de la propiedad TabCaption.
Ajuste de línea
Devuelve o Establece ONU Que valor indica si el texto de Cada ficha Continúa en la línea siguiente Cuando Es Demasiado largo y no horizontalmente Cabe En Una ficha de controlar de la ONU de Diálogo con pestañas.
Comentarios
Florerias del USAR la propiedad WordWrap Parr determinar S. ficha S. la forma En que el SSTab control Muestra el texto En Cada. Por Ejemplo, En un cuadro de Diálogo con fichas Que se dinamicamente modifi, el texto también cambio Florerias. Para asegurarse de Que No se truncará si es Demasiado largo, establezca la propiedad WordWrap Un verdadero, la propiedad TabMaxWidth ONU cero (0) y la propiedad TabHeight Una ONU alto Que permita ver el texto Más largo posible.
ShowFocusRect:
Establece Mediante Verdadero o Falso Si Se Dibuja ONU recuadro punteado en el Pestana esta CUANDO Tiene el foco
Imagen
Establece ONU gráfico Para Los here
Comentarios
En Tiempo de diseño Florerias establecer la propiedad Imagen De Una ficha si Hace clic en ella y Despues Establece la propiedad en la ventana Propiedades. En Tiempo de Ejecución Florerias establecer la propiedad de imagen con la Función LoadPicture o con la propiedad Imagen de Otro de Control o de Otro Objeto Formulario. Florerias convertir CUALQUIER ficha en la ficha activa si Establece la propiedad Tab.
Al establecer la propiedad Imagen En Tiempo de diseño, el gráfico se guarda y se carga con el Que Forma Objeto SSTab Contiene el control. Si unarchivo crea ejecutable, el archivo contendrá la imagen. Al cargar la ONU gráfico en Tiempo de Ejecución, El Gráfico no se guarda con laaplicación.
Establecer la propiedad de imagen afecta al valor de la propiedad TabPicture de la ficha y real:: Además Aparece la imagen Correspondiente en la ficha activa.
Ejemplo
Private Sub Command1_Click ()
SSTab1.Picture = LoadPicture ("Ruta de la imagen")
End Sub
TabCaption:
Comentarios
En Tiempo de diseño, Florerias establecer la propiedad TabCaption si Hace clic del Una ficha y Establece la propiedad Caption en la ventana Propiedades. Seleccione también Florerias (Personalizado) en la ventana Propiedades y establecer la propiedad TabCaption en la ficha General del cuadro de Diálogo Propiedades .
En Tiempo de Ejecución Florerias leer o cambio de título de CUALQUIER ficha Mediante la propiedad TabCaption. También Florerias USAR la propiedad Caption Parr cambio a la propiedad TabCaption Sólo Para la ficha activa.
Florerias del USAR la propiedad TabCaption parrafo Asignar ONU Una ficha unatecla de Acceso. En el valor de TabCaption, incluya El Símbolo y INMEDIATAMENTE Antes del Carácter Que DESEA designar Como tecla de acceso. E El Carácter aparecera Subrayado. PRESIONE ALT Tecla pinchar el Carácter de Subrayado Para Que la ficha PASE ONU Ser la ficha activa. Para INCLUIR Símbolo de la ONU y en el sin título Crear Una tecla de acceso, seguidos Escribá dos simbolos (&&). En el título Sólo uno aparecera y el pecado Subrayado Habra ningún Carácter.
Lengüeta
Comentarios
La ficha actual se COLOCA en imprimación plano y pasa ONU Ser la ficha activa.
Normalmente, el usuario de la Aplicación Hará clic del Una ficha parrafo convertirla en la ficha activa. Sin embargo, un representante de Florerias Que Tenga Que seleccionarla en el código. Por Ejemplo, Florerias Que desee Que Cierta ficha mar la activa Cada Vez Que se muestre POSICIÓN de Diálogo Determinado en la aplicación. Si Abandona el cuadro de Diálogo Mediante el Método Ocultar Objeto del Formulario, la última ficha Que ESTABA activa al ocultar el Formulario seguira Siendo la ficha activa CUANDO aparezca de nuevo el cuadro de Diálogo. Florerias establecer la propiedad del Tab control SSTab Para Que Esté activa La Misma ficha Cada Vez Que aparezca el cuadro de Diálogo.
Ejemplo
Este EJEMPLO Hace Que la ficha activa mar siempre la primera ficha del justo SSTab Control eléct de control disponibilidadReservar Mostrar el Formulario Que Contiene el. Para activo activo probar esta EJEMPLO, Formulario cree dos Objetos. Coloque el control CommandButton la ONU el control de en el Form1 y SSTab de la ONU en el Form2. Pegue el código en el evento clic del control CommandButton del Form1 y Despues ejecute El Ejemplo.
Private Sub Command1_Click () Form2.SSTab1.Tab = 1 Form2.Show End Sub
Filas
Devuelve El Numero de Filas de fichas
Comentarios
El Número de filas del control SSTab se ESPECIFICA En Tiempo de diseño Mediante las propiedades Aquí y TabsPerRow.
TabEnabled
Determina si el Tab Especificado esta habilitado o Deshabilitado
Comentarios
Una ficha de de Cuando desactivada esta, su texto Aparece atenuado y el usuario no seleccionarla Florerias.
La propiedad tabEnabled activa o Desactiva Una sueltas ficha. Para Activar o Desactivar Todo SSTab control de el, utilice la propiedad Enabled.
TabVisible:
Determina si el Tab Especificado estara visible o no
Comentarios
La propiedad TabVisible Muestra u Oculta sueltas FICHA Una. Florerias del USAR la propiedad Mostrar Parr visibles u ocultar el control TODO SSTab de el.
5 - Establecer ONU GRAFICO Una Pestaña de la ONU
ONU establecerle Para GRAFICO Una Pestaña un, solo hay Que Seleccionar la Pestaña Que Queremos y desde la ventana de propiedades Seleccionar Imagen y Elegir el archivo gráfico.
Si quisiéremos Hacerlo En Tiempo de Ejecución, podriamos Hacerlo de esta forma refiriendonos Una la propiedad TabPicture :
Private Sub Command1_Click () 'Le pasamos la ONU la propiedad tabPicture el índice del tabulador. El_SSTab.TabPicture (0) = LoadPicture (App.Path & "\ imagen.ico") End Sub
Nota : también podriamos establecer Gráficos Un Tab Cada En Tiempo de Ejecución que estan Cargados en el control ImageList de la ONU.
6 - Ejemplo Parr establecer en Tiempo de Ejecución el subtítulo de la ONU Tab
Aquí Cuando Se presiona ONU Command1 se le Establece el texto "Datos" imprimación Tab al, it Decir El que ficha Tiene el índice Número 0.
Private Sub Command1_Click () 'Le pasamos Una ficha el TabCaption la propiedad del índice y le asignamos texto ONU SSTab1.TabCaption (0) = "Datos" End Sub
7 - Buscas? Busca Otros here o pestañas en Tiempo de Ejecución
Buscas? Busca Otros ONU Tabbed Dialog Llamado SSTab1, Colocar ONU Command1 y ONU Text1 en el Formulario.
LUEGO Cada ves Que Presiones el Command1, se agregará nuevo ONU Tab En Tiempo de Ejecución con el texto Que se Haya ingresado en el control el de Text1
Código fuente en el Formulario
Private Sub Command1_Click ()
Llame Buscas? Busca Otros (Text1)
End Sub
Private Sub Buscas? Busca Otros (Texto_Tab As String)
SSTab1.Tabs = SSTab1.Tabs + 1
SSTab1.TabCaption (SSTab1.Tabs - 1) = Texto_Tab
End Sub
Private Sub Form_Load ()
SSTab1.Tabs = 1
End Sub
8 - Eventos del Sstab
- Haga click en: Ocurre Cuando El usuario presiona y suelta la ONU Botón del control de ratón Sobre el de
- DblClick: Ocurre al presionar y soltar la ONU ratón Botón del, y volver a presionarlo y soltarlo Sobre el controlar el
- GotFocus: Ocurre Cuando El Mismo recibir con el Enfoque
- LostFocus: Ocurre CUANDO pierde el control de el el Enfoque
- MouseDown: Ocurre Cuando El usuario presiona el botón Aportes Aportes del ratón MIENTRAS el Control de Tiene el Enfoque
- MouseMove: Se ejecuta Cuando Se Mueve el ratón Sobre el Sstab
- MouseUp: Se ejcuta al soltar El Botón del ratón CUANDO Tiene el Enfoque
- Validar: pierde el control del Ocurre Cuando El Enfoque en el control de de la ONU un favor de los Productos Que Una Validación, En Este Caso del Sstab
Como se ve en la Descripción anterior, esta Ninguna Posee ningún evento propio, Es Decir Tiene los eventos Comunes Que Poseen la Mayoría de los Controles
Difiere Lo Que Único, Es El evento Click, en el mar el cual sea Posee PARÁMETRO ONU Adicional Llamado PreviousTab
Private Sub SSTab1_Click (PreviousTab As Integer) End Sub
Al Hacer clic en el control de de el, esta PARÁMETRO nos Devuelve el Tab anterior al cual sea click mar sí Hizo.
El Ejemplo siguiente obtiene el subtítulo del Tab en el Cual se Hizo clic (Tab Activo), y él here Visualiza en la barra de título del Formulario:
Private Sub SSTab1_Click (PreviousTab As Integer)
'Visualiza en la barra de título del Formar el epígrafe _
del Tab activo
Me.Caption = SSTab1.TabCaption (SSTab1.Tab)
End Sub
9 - Propiedad Container
El siguiente Ejemplo, COLOCA En Tiempo de Ejecución, el control TextBox la ONU el control de Que SE ENCUENTRA Fuera del SSTab, y lo Hace en la ficha activa del Mismo, utilizando la propiedad de Contenedores del textBox:
Private Sub Command1_Click () 'Pestaña activo Coloca el Text1 en el Establecer Text1.Container = SSTab1 'redimensiona el Text1 el mando y lo posiciona Text1.Move 50, SSTab1.TabHeight + 100, _ SSTab1.Width - 100, _ SSTab1.Height - SSTab1.TabHeight - 200 End Sub
10 - redimensionar el SSTab en el Cambio de Tamaño del Formulario
Este Ejemplo, Cuando Se cambia de Tamaño el Formulario, redimensiona posiciona y el Control de pestañas de Diálogo Que del del tenga al ancho y alto el Formulario. Also se redimensiona la ONU el control TextBox El Que SE Encuentra Dentro De uno de los here
Colocar ONU SSTab Cuadro de texto de la ONU y de la ONU Dentro Tab
Private Sub Form_Resize () 'posiciona y redimensiona el Sstab al ancho y alto del fomulario SSTab1.Move 10, 10, ScaleWidth - 10, ScaleHeight - 10 'posiciona y redimensiona el cuadro de texto Text1.Move 50, SSTab1.TabHeight + 100, _ SSTab1.Width - 100, _ SSTab1.Height - SSTab1.TabHeight - 200 End Sub
