Muestra un mensaje en un cuadro de diálogo, espera a que el usuario introduzca 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 consta de los siguientes argumentos:
| Argumento | Descripción |
|---|---|
| mensaje | Obligatorio. Expresión de cadena mostrada como mensaje en el cuadro de diálogo. La longitud máxima de la solicitud es de aproximadamente 1024 caracteres, dependiendo del ancho de los caracteres utilizados. Si la indicación consta de más de una línea, puede separarlas mediante un carácter de retorno de carro (Chr(13)), un carácter de avance de línea (Chr(10)) o una combinación de caracteres de retorno de carro-avance de línea (Chr(13) & Chr(10)) entre cada línea. |
| Título | Opcional. Expresión de cadena mostrada 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 mostrada 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 mostrará vacío. |
| XPO | 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 se omite XPOS , el cuadro de diálogo se centrará 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 se omite ypos , el cuadro de diálogo se coloca verticalmente aproximadamente un tercio del camino hacia abajo de la pantalla. |
| archivo de ayuda | Opcional. Expresión de cadena que identifica el archivo de Ayuda que se va a usar para proporcionar ayuda contextual para el cuadro de diálogo. Si se proporciona un archivo de ayuda , también se debe proporcionar contexto . |
| contexto | Opcional. Expresión numérica, es decir, el número de contexto de Ayuda asignado al tema de Ayuda adecuado por el autor de la Ayuda. Si se proporciona contexto , también se debe proporcionar el archivo de ayuda . |
Observaciones
Cuando se proporcionan tanto el archivo de ayuda como el contexto , el usuario puede presionar F1 (Windows) o AYUDA (Macintosh) para ver el tema de Ayuda correspondiente al contexto. Algunas aplicaciones host también agregan automáticamente un botón de Ayuda al cuadro de diálogo. Si el usuario hace clic en Aceptar o presiona ENTRAR, la función InputBox devuelve lo que esté 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 del primer argumento con nombre, debe usar InputBox en una expresión. Para omitir algunos argumentos posicionales, 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 maneras de usar la función InputBox 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 para los ejes respectivos. La variable MyValue 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)