Latest web development tutorials

Fungsi VBScript InputBox

VBScript Referensi Lengkap VBScript Referensi

fungsi InputBox menampilkan kotak dialog dimana pengguna dapat memasukkan teks dan / atau klik pada tombol. Jika pengguna mengklik klik tombol OK atau tekan ENTER pada keyboard, fungsi InputBox mengembalikan teks dalam kotak teks. Jika pengguna mengklik tombol Batal, fungsi mengembalikan string kosong ( "").

Catatan: Jika Anda tentukan helpfile dan konteks parameter, itu akan menambahkan tombol Bantuan ke kotak dialog.

Tip: Lihat fungsi MsgBox.

tatabahasa

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 参数一起使用。

* Unit Twip ukuran sama dalam tampilan visual dari sistem.
1 twip dari 1/1440 inci.

contoh

contoh 1

<script type="text/vbscript">

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

</script>

Coba »

contoh 2

Prompt kotak dengan judul:

<script type="text/vbscript">

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

</script>

Coba »

contoh 3

Default cepat kotak dengan kotak input teks:

<script type="text/vbscript">

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

</script>

Coba »

contoh 4

700 twips * dalam posisi dari tepi kiri layar menampilkan kotak prompt.

<script type="text/vbscript">

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

</script>

Coba »

contoh 5

Tip dari kotak di pinggir layar 500 twips * posisi tampilan.

<script type="text/vbscript">

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

</script>

Coba »

VBScript Referensi Lengkap VBScript Referensi