Latest web development tutorials

função VBScript InputBox

VBScript Referência Completa VBScript Referência

função InputBox exibe uma caixa de diálogo onde o usuário pode digitar o texto e / ou clicar em um botão. Se o usuário clicar clique no botão OK ou pressione a tecla Enter no teclado, a função InputBox retorna o texto na caixa de texto. Se o usuário clicar no botão Cancelar, a função devolve uma cadeia vazia ( "").

Nota: Se você especificou parâmetros ArquivoDeAjuda e de contexto, ele irá adicionar um botão de ajuda para a caixa de diálogo.

Dica: Veja a função MsgBox.

gramática

InputBox(prompt[,title][,default][,xpos][,ypos][,helpfile,context])

参数 描述
prompt 必需。显示在对话框中的消息。prompt 的最大长度大约是 1024 个字符,这取决于所使用的字符的宽度。如果 prompt 中包含多个行,则可在各行之间用回车符(Chr(13))、换行符(Chr(10))或回车换行符的组合(Chr(13) & Chr(10))来分隔各行。
title 可选。对话框的标题。默认是应用程序的名称。
default 可选。一个在文本框中的默认文本。
xpos 可选。数值表达式,用于指定对话框的左边缘与屏幕左边缘的水平距离(单位为 twips*)。如果省略 xpos,则对话框会在水平方向居中。
ypos 可选。数值表达式,用于指定对话框的上边缘与屏幕上边缘的垂直距离(单位为 twips*)。如果省略 ypos,则对话框显示在屏幕垂直方向距下边缘大约三分之一处。
helpfile 可选。字符串表达式,用于标识为对话框提供上下文相关帮助的帮助文件。必须与 context 参数一起使用。
context 可选。数值表达式,用于标识由帮助文件的作者指定给某个帮助主题的上下文编号。必须与 helpfile 参数一起使用。

* Twip unidade de medida é o mesmo que no mostrador visual do sistema.
1 twip de 1/1440 polegadas.

Exemplos

exemplo 1

<script type="text/vbscript">

Function myFunction()
fname=InputBox("Enter your name")
End Function

</script>

tente »

exemplo 2

A caixa de tempo com o título:

<script type="text/vbscript">

Function myFunction()
fname=InputBox("Enter your name","Userinput")
End Function

</script>

tente »

exemplo 3

A caixa de prompt padrão com texto caixa de entrada:

<script type="text/vbscript">

Function myFunction()
fname=InputBox("Enter your name",,"Donald Duck")
End Function

</script>

tente »

exemplo 4

700 twips * em uma posição a partir da borda esquerda da tela exibe a caixa de diálogo.

<script type="text/vbscript">

Function myFunction()
fname=InputBox("Enter your name",,,700)
End Function

</script>

tente »

exemplo 5

Dica de uma caixa na borda da tela 500 twips * exibição de posição.

<script type="text/vbscript">

Function myFunction()
fname=InputBox("Enter your name",,,,500)
End Function

</script>

tente »

VBScript Referência Completa VBScript Referência