Funci贸n InputBox

Muestra un indicador en un di谩logo en el que el usuario puede introducir texto. La entrada se asigna a una variable.

La instrucci贸n InputBox es un m茅todo adecuado para introducir texto a trav茅s de un di谩logo. Confirme la entrada pulsando Aceptar o la tecla Retorno. La entrada se devuelve como valor de retorno de la funci贸n. Si se cierra el di谩logo con Cancelar, InputBox devuelve una cadena de longitud cero ("").

Sintaxis:


InputBox (Prompt As String[, Title As String[, Default As String[, xpostwips As Integer, ypostwips As Integer]]]) As String

Par谩metros:

prompt: String expression displayed as the message in the dialog box.

t铆tulo: expresi贸n de cadena que se muestra en la barra de t铆tulo del cuadro de di谩logo.

default: String expression displayed in the text box as default if no other input is given.

xpostwips: Integer expression that specifies the horizontal position of the dialog. The position is an absolute coordinate and does not refer to the window of LibreOffice.

ypostwips: Integer expression that specifies the vertical position of the dialog. The position is an absolute coordinate and does not refer to the window of LibreOffice.

If xpostwips and ypostwips are omitted, the dialog is centered on the screen. The position is specified in twips.

Valor de retorno:

Cadena

Ejemplo:


Sub ExampleInputBox
Dim sText As String
    sTexto  = InputBox ("Escriba una frase:","Estimado usuario")
    MsgBox ( sTexto , 64, "Confirmaci贸n de frase")
End Sub

隆Necesitamos su ayuda!