InputBox (Función, Visual Basic)
Actualización: noviembre 2007
Muestra un mensaje en un cuadro de diálogo, espera a que el usuario escriba un texto o haga clic en un botón y devuelve una cadena con el contenido del cuadro de texto.
Public Function InputBox( _
ByVal Prompt As String, _
Optional ByVal Title As String = "", _
Optional ByVal DefaultResponse As String = "", _
Optional ByVal Xpos As Integer = -1, _
Optional ByVal YPos As Integer = -1 _
) As String
Parámetros
Prompt
Requerido. Expresión de tipo String que se muestra como mensaje en el cuadro de diálogo. La longitud máxima de Prompt es de aproximadamente 1024 caracteres, según el ancho de los caracteres utilizados. Si Prompt incluye más de una línea, puede separar las líneas mediante un carácter de retorno de carro (Chr(13)), un carácter de salto de línea (Chr(10)) o una combinación de retorno de carro y salto de línea (Chr(13) & Chr(10)) que inserta entre cada línea.Title
Opcional. Expresión de tipo String que se muestra en la barra de título del cuadro de diálogo. Si se omite Title, en la barra de título aparecerá el nombre de la aplicación.DefaultResponse
Opcional. Expresión de tipo String que se muestra en el cuadro de texto como respuesta predeterminada en caso de que no se suministre otra entrada. Si se omite DefaultResponse, el cuadro de texto se mostrará vacío.XPos
Opcional. Expresión numérica que especifica, en píxeles, la distancia entre el borde izquierdo del cuadro de diálogo y el borde izquierdo de la pantalla. Si omite XPos y YPos, el cuadro de diálogo se centra en la pantalla.YPos
Opcional. Expresión numérica que especifica, en píxeles, la distancia entre el borde superior del cuadro de diálogo y el borde superior de la pantalla. Si omite XPos y YPos, el cuadro de diálogo se centra en la pantalla.
Comentarios
Si el usuario hace clic en Cancelar, se devolverá una cadena de longitud cero.
Si desea especificar más que el primer argumento, deberá utilizar la función InputBox en una expresión. Si omite alguno de los argumentos de posición, deberá conservar el correspondiente delimitador de coma.
.gif "Nota") Nota: |
|---|
La función InputBox requiere un permiso UIPermission del nivel SafeTopLevelWindows que podría afectar a su ejecución en situaciones de confianza parcial. Para obtener más información, vea Solicitar permisos y UIPermission (Clase). |
Ejemplo
En este ejemplo se muestran distintas formas de utilizar la función InputBox para pedir al usuario que especifique un valor. Si se omiten las posiciones x e y, el cuadro de diálogo quedará centrado automáticamente respecto a ambos ejes. La variable MyValue contiene el valor especificado por el usuario al hacer clic en Aceptar o presionar la tecla ENTRAR.
Dim message, title, defaultValue As String
Dim myValue As Object
' Set prompt.
message = "Enter a value between 1 and 3"
' Set title.
title = "InputBox Demo"
defaultValue = "1" ' Set default value.
' Display message, title, and default value.
myValue = InputBox(message, title, defaultValue)
' If user has clicked Cancel, set myValue to defaultValue
If myValue Is "" Then myValue = defaultValue
' Display dialog box at position 100, 100.
myValue = InputBox(message, title, defaultValue, 100, 100)
' If user has clicked Cancel, set myValue to defaultValue
If myValue Is "" Then myValue = defaultValue
Requisitos
Espacio de nombres:Microsoft.VisualBasic
**Módulo:**Interaction
**Ensamblado:**Visual Basic Runtime Library (en Microsoft.VisualBasic.dll)