IBM Lotus Symphony
|
Exibe um prompt em um diálogo no qual o usuário pode inserir texto. A entrada é atribuída a uma variável.
A instrução InputBox é um método conveniente de inserir texto por meio de um diálogo. Confirme a entrada, clicando em OK ou pressione Retornar. A entrada é retornada como o valor de retorno da função. Se você fechar o diálogo com Cancelar, InputBox retornará uma sequência de comprimento zero ("").
InputBox (Msg As String[, Title As String[, Default As String[, x_pos As Integer, y_pos As Integer]]]])
Sequência
Msg : Expressão de sequência exibida como a mensagem na caixa de diálogo.
Title : Expressão de sequência exibida na barra de título da caixa de diálogo.
Default : Expressão de sequência exibida na caixa de texto como padrão, se nenhuma outra entrada for fornecida.
x_pos : Expressão inteira que especifica a posição horizontal do diálogo. A posição é uma coordenada absoluta e não se refere à janela do aplicativo Lotus® Symphony™.
y_pos : Expressão inteira que especifica a posição vertical do diálogo. A posição é uma coordenada absoluta e não se refere à janela do aplicativo Lotus Symphony.
Se x_pos e y_pos forem omitidos, o diálogo será centralizado na tela. A posição é especificada em twips.
Sub ExampleInputBox
Dim sText As String
sText = InputBox ("Please enter a phrase:","Dear User")
MsgBox ( sText , 64, "Confirmation of phrase")
End Sub