Muestra un mensaje en un cuadro de diálogo, espera a que el usuario escriba texto o haga clic en un botón y devuelve una cadena que contiene el contenido del cuadro de texto.
Sintaxis
InputBox ( prompt [, title ] [, default ] [, xpos ] [, ypos ] [, helpfile ] [, context ] )
La sintaxis de la función InputBox tiene estos argumentos:
|
Argumento |
Descripción |
|---|---|
|
Pronto |
Requerido. Expresión de cadena mostrada como mensaje en el cuadro de diálogo. La longitud máxima del mensaje es de aproximadamente 1024 caracteres, según el ancho de los caracteres utilizados. Si el indicador consta de más de una línea, puede separar las líneas mediante un carácter de retorno de carro (13)), un carácter de suministro de línea (10)) o una combinación de caracteres de retorno y suministro de línea de carro (Chr(13) & Chr(10)) entre cada línea. |
|
title |
Opcional. Expresión de cadena que se muestra en la barra de título del cuadro de diálogo. Si omite el título, el nombre de la aplicación se coloca en la barra de título. |
|
predeterminado |
Opcional. Expresión de cadena que se muestra en el cuadro de texto como respuesta predeterminada si no se proporciona ninguna otra entrada. Si omite el valor predeterminado, el cuadro de texto se muestra vacío. |
|
xpos |
Opcional. Expresión numérica que especifica, en twips, la distancia horizontal del borde izquierdo del cuadro de diálogo desde el borde izquierdo de la pantalla. Si omite xpos , el cuadro de diálogo se centra horizontalmente. |
|
ypos |
Opcional. Expresión numérica que especifica, en twips, la distancia vertical del borde superior del cuadro de diálogo desde la parte superior de la pantalla. Si omite el argumento ypos , el cuadro de diálogo se coloca verticalmente aproximadamente un tercio del camino hacia abajo de la pantalla. |
|
Helpfile |
Opcional. Expresión de cadena que identifica el archivo de Ayuda que se usará para proporcionar ayuda contextual para el cuadro de diálogo. Si se proporciona helpfile , también debe proporcionarse contexto . |
|
Contexto |
Opcional. Expresión numérica que es el número de contexto de ayuda asignado al tema de Ayuda apropiado por el autor de la Ayuda. Si se proporciona contexto , también debe proporcionarse helpfile . |
Comentarios
Cuando se proporcionan helpfile y el contexto , el usuario puede presionar F1 (Windows) o AYUDA (Macintosh) para ver el tema de ayuda correspondiente al contexto. Algunas aplicación de host también agregan automáticamente un botón Ayuda al cuadro de diálogo. Si el usuario hace clic en Aceptar o presiona ENTRAR, la función CuadroEntr devuelve lo que haya en el cuadro de texto. Si el usuario hace clic en Cancelar, la función devuelve una cadena de longitud cero ("").
Nota: Para especificar más que el primer argumento con nombre, debe usar InputBox en un expresión. Para omitir algunos argumentos posicionares, debe incluir el delimitador de coma correspondiente.
Ejemplo
Nota: Los ejemplos siguientes muestran el uso de esta función en un módulo de Visual Basic para Aplicaciones (VBA). Para obtener más información sobre cómo trabajar con VBA, seleccione referencia para desarrolladores en la lista desplegable situada junto a búsqueda y escriba uno o varios términos en el cuadro de búsqueda.
En este ejemplo se muestran varias formas de usar la función CuadroEntr para pedir al usuario que escriba un valor. Si se omiten las posiciones x e y, el cuadro de diálogo se centra automáticamente en los ejes respectivos. La MyValue variable contiene el valor especificado por el usuario si el usuario hace clic en Aceptar o presiona la tecla ENTRAR. Si el usuario hace clic en Cancelar, se devuelve una cadena de longitud cero.
Dim Message, Title, Default, MyValue
Message = "Enter a value between 1 and 3" ' Set prompt.
Title = "InputBox Demo" ' Set title.
Default = "1" ' Set default.
' Display message, title, and default value.
MyValue = InputBox(Message, Title, Default)
' Use Helpfile and context.
' The Help button is added automatically.
MyValue = InputBox(Message, Title,,,,"DEMO.HLP", 10)
' Display dialog box at position 100, 100.
MyValue = InputBox(Message, Title, Default, 100, 100)
