A função InputBox() é usada em VB para exibir uma caixa de diálogo, permitindo ao usuário inserir um valor na caixa de diálogo para ser repassado ao programa para processamento. O formato da sintaxe da função InputBox() é o seguinte:
InputBox(prompt[, title] [, default] [, xpos] [, ypos] [, helpfile, context])
Os parâmetros na sintaxe da função InputBox têm os seguintes significados:
(1) Parâmetro de prompt: Este parâmetro é obrigatório. Principalmente expressões de string que aparecem em caixas de diálogo. O comprimento máximo do prompt é de aproximadamente 1.024 caracteres, determinado pela largura dos caracteres usados. Se o prompt contiver várias linhas, você poderá usar retornos de carro (Chr(13)), avanços de linha (Chr(10)) ou uma combinação de retornos de carro e avanços de linha (Chr(13) e Chr(10)) entre os linhas para separar.
(2) O título é opcional. Exibe a expressão de string na barra de título da caixa de diálogo. Se o título for omitido, o nome do aplicativo será colocado na barra de título.
(3) Padrão opcional. Exibe a expressão de string na caixa de texto como valor padrão quando nenhuma outra entrada é fornecida. Se o padrão for omitido, a caixa de texto estará vazia.
(4) Xpos opcional. As expressões numéricas, que aparecem em pares, especificam a distância horizontal entre o lado esquerdo da caixa de diálogo e o lado esquerdo da tela. Se xpos for omitido, a caixa de diálogo será centralizada horizontalmente.
(5) Sim opcional. As expressões numéricas, que aparecem em pares, especificam a distância entre a borda superior da caixa de diálogo e a borda superior da tela. Se ypos for omitido, a caixa de diálogo será colocada aproximadamente um terço verticalmente da parte inferior da tela.
(6) Arquivo de ajuda opcional. Expressão de string que identifica o arquivo de ajuda usado para fornecer ajuda contextual para a caixa de diálogo. Se o arquivo de ajuda for fornecido, o contexto também deverá ser fornecido.
(7)Contexto opcional. Expressão numérica que é o número do contexto de ajuda atribuído a um tópico de ajuda pelo autor do arquivo de ajuda. Se o contexto for fornecido, o arquivo de ajuda também deverá ser fornecido.
Coisas a serem observadas:
Se o arquivo de ajuda e o contexto forem fornecidos, o usuário poderá pressionar F1 para visualizar o tópico de ajuda correspondente ao contexto. Alguns aplicativos host, como o Microsoft Excel, adicionam automaticamente um botão Ajuda à caixa de diálogo. Se o usuário clicar em OK ou pressionar ENTER, a função InputBox retornará o conteúdo da caixa de texto. Se o usuário clicar em Cancelar, esta função retornará uma string de comprimento zero ().
Se você também quiser especificar parâmetros diferentes do primeiro parâmetro nomeado, deverá usar um InputBox na expressão. Se desejar omitir determinados parâmetros posicionais, você deverá incluir os delimitadores de vírgula correspondentes.
Uso de referência:
'A função do programa é usar a função inputbox para inserir dois dados e conectá-los.
Dim a As String, b As String
Subcomando Privado1_Click()
a = InputBox(Insira os primeiros dados:)
b = InputBox(Insira os segundos dados:)
Finalizar sub
Subcomando Privado2_Click()
Caixa de mensagens a e b
Finalizar sub