Método Pages.Add (Access)
El método Add agrega un nuevo objeto Page a la colección Pages de un control de pestaña.
Sintaxis
expresión. Agregar (antes)
Expresión Variable que representa un objeto Pages .
Parameters
Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
---|---|---|---|
Before | Opcional | Variant | Integerque especifica el índice del objeto Page delante del cual debe agregarse el nuevo objeto Page. El índice del objeto Page corresponde al valor de la propiedad PageIndex de ese objeto Page. Si omite este argumento, el nuevo objeto Page se agrega al final de la colección. |
Valor devuelto
Page
Comentarios
El primer objeto Page de la colección Pages corresponde a la página situada más a la izquierda del control de pestaña y tiene un índice de 0. El segundo objeto Page está situado inmediatamente a la derecha de la primera página y tiene un índice de 1, etc para todos los objetos Page del control de pestaña.
Si especifica 0 para el argumento Before, el nuevo objeto Page se agrega antes del primer objeto Page de la colección Pages. A continuación, el nuevo objeto Page se convierte en el primer objeto Page de la colección con un índice de 0.
Puede agregar un objeto Page a la colección Pages de un control de pestaña solo cuando el formulario se encuentra en la vista Diseño.
Ejemplo:
En el siguiente ejemplo, se agrega una página a un control de pestaña de un formulario que se encuentra en la vista Diseño. Para probar este ejemplo, cree un formulario denominado Form1 con un control de pestaña denominado TabCtl0. Pegue el código siguiente en un módulo estándar y ejecútelo.
Function AddPage() As Boolean
Dim frm As Form
Dim tbc As TabControl, pge As Page
On Error GoTo Error_AddPage
Set frm = Forms!Form1
Set tbc = frm!TabCtl0
tbc.Pages.Add
AddPage = True
Exit_AddPage:
Exit Function
Error_AddPage:
MsgBox Err & ": " & Err.Description
AddPage = False
Resume Exit_AddPage
End Function
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.
Comentarios
https://aka.ms/ContentUserFeedback.
Próximamente: a lo largo de 2024, eliminaremos gradualmente los problemas de GitHub como mecanismo de comentarios para el contenido y lo reemplazaremos por un nuevo sistema de comentarios. Para obtener más información, consulte:Enviar y ver comentarios de