VBScript - กล่องโต้ตอบ
Dialog Box คืออะไร?
VBScript ช่วยให้นักพัฒนาสามารถโต้ตอบกับผู้ใช้ได้อย่างมีประสิทธิภาพ อาจเป็นกล่องข้อความเพื่อแสดงข้อความถึงผู้ใช้หรือช่องป้อนข้อมูลที่ผู้ใช้สามารถป้อนค่าได้
ฟังก์ชัน VBScript MsgBox
ฟังก์ชัน MsgBox จะแสดงกล่องข้อความและรอให้ผู้ใช้คลิกปุ่มจากนั้นการดำเนินการจะดำเนินการตามปุ่มที่ผู้ใช้คลิก
ไวยากรณ์
MsgBox(prompt[,buttons][,title][,helpfile,context])
คำอธิบายพารามิเตอร์
Prompt- พารามิเตอร์ที่จำเป็น สตริงที่แสดงเป็นข้อความในกล่องโต้ตอบ ความยาวสูงสุดของพร้อมต์คือประมาณ 1024 อักขระ หากข้อความขยายไปมากกว่าหนึ่งบรรทัดเราสามารถแยกบรรทัดโดยใช้อักขระส่งคืนแคร่ (Chr (13)) หรืออักขระป้อนบรรทัด (Chr (10)) ระหว่างแต่ละบรรทัด
buttons- พารามิเตอร์เสริม นิพจน์ตัวเลขที่ระบุประเภทของปุ่มที่จะแสดงลักษณะไอคอนที่จะใช้เอกลักษณ์ของปุ่มเริ่มต้นและรูปแบบของกล่องข้อความ หากปล่อยว่างไว้ค่าเริ่มต้นสำหรับปุ่มคือ 0
Title- พารามิเตอร์เสริม นิพจน์สตริงที่แสดงในแถบชื่อเรื่องของกล่องโต้ตอบ หากชื่อเรื่องถูกปล่อยว่างไว้ชื่อแอปพลิเคชันจะอยู่ในแถบชื่อเรื่อง
helpfile- พารามิเตอร์เสริม นิพจน์สตริงที่ระบุไฟล์วิธีใช้ที่จะใช้เพื่อให้ความช่วยเหลือตามบริบทสำหรับกล่องโต้ตอบ
context- พารามิเตอร์เสริม นิพจน์ตัวเลขที่ระบุหมายเลขบริบทวิธีใช้ที่กำหนดโดยผู้เขียนวิธีใช้ให้กับหัวข้อวิธีใช้ที่เหมาะสม หากมีการระบุบริบทจะต้องระบุ helpfile ด้วย
Buttons พารามิเตอร์สามารถรับค่าใด ๆ ต่อไปนี้ -
0 vbOKOnly แสดงปุ่ม OK เท่านั้น
1 vbOKCancel แสดงปุ่มตกลงและยกเลิก
2 vbAbortRetryIgnore แสดงปุ่มยกเลิกลองใหม่และละเว้น
3 vb ใช่ NoCancel แสดงปุ่มใช่ไม่ใช่และยกเลิก
4 vb มีไม่แสดงปุ่มใช่และไม่ใช่
5 vbRetryCancel แสดงปุ่มลองใหม่และยกเลิก
16 vbCritical แสดงไอคอนข้อความสำคัญ
32 vbQuestion แสดงไอคอนคำเตือน Query
48 vbExclamation แสดงไอคอนข้อความเตือน
64 vb ข้อมูลแสดงไอคอนข้อความข้อมูล
0 vbDefaultButton1 ปุ่มแรกเป็นค่าเริ่มต้น
256 vbDefaultButton2 ปุ่ม Second เป็นค่าเริ่มต้น
512 vbDefaultButton3 ปุ่มที่สามเป็นค่าเริ่มต้น
768 vbDefaultButton4 ปุ่มที่สี่เป็นค่าเริ่มต้น
0 vbApplicationModal Application modal แอปพลิเคชันปัจจุบันจะไม่ทำงานจนกว่าผู้ใช้จะตอบกลับกล่องข้อความ
โมดอลของระบบ vbSystemModal 4096 แอปพลิเคชันทั้งหมดจะไม่ทำงานจนกว่าผู้ใช้จะตอบกลับกล่องข้อความ
ค่าข้างต้นแบ่งออกเป็นสี่กลุ่มตามหลักเหตุผล: กลุ่มแรก (0 ถึง 5) ระบุปุ่มที่จะแสดงในกล่องข้อความ กลุ่มที่สอง (16, 32, 48, 64) อธิบายสัญลักษณ์ของไอคอนที่จะแสดงกลุ่มที่สาม (0, 256, 512, 768) ระบุว่าปุ่มใดต้องเป็นค่าเริ่มต้นและกลุ่มที่สี่ (0, 4096 ) กำหนดรูปแบบของกล่องข้อความ
ส่งคืนค่า
ฟังก์ชัน MsgBox สามารถส่งคืนค่าใดค่าหนึ่งต่อไปนี้ -
1 - vbOK - คลิกตกลง
2 - vbCancel - คลิกยกเลิก
3 - vbAbort - ยกเลิกถูกคลิก
4 - vbRetry - ลองใหม่ถูกคลิก
5 - vbIgnore - คลิกที่ละเว้น
6 - vb ใช่ - ใช่ถูกคลิก
7 - vbNo - ไม่มีการคลิก
ตัวอย่าง
<!DOCTYPE html>
<html>
<body>
<script language = "vbscript" type = "text/vbscript">
'Message Box with just prompt message
MsgBox("Welcome")
'Message Box with title, yes no and cancel Butttons
a = MsgBox("Do you like blue color?",3,"Choose options")
' Assume that you press No Button
document.write("The Value of a is " & a)
</script>
</body>
</html>
เมื่อเรียกใช้สคริปต์ด้านบนกล่องข้อความจะปรากฏขึ้นและหากคุณกดปุ่ม No ค่าของ a คือ 7
The Value of a is 7
ฟังก์ชัน VBScript InputBox
ฟังก์ชัน InputBox ช่วยให้ผู้ใช้รับค่าจากผู้ใช้ หลังจากป้อนค่าแล้วหากผู้ใช้คลิกปุ่ม OK หรือกด ENTER บนแป้นพิมพ์ฟังก์ชัน InputBox จะส่งคืนข้อความในกล่องข้อความ หากผู้ใช้คลิกที่ปุ่มยกเลิกฟังก์ชันจะส่งคืนสตริงว่าง ("")
ไวยากรณ์
InputBox(prompt[,title][,default][,xpos][,ypos][,helpfile,context])
คำอธิบายพารามิเตอร์
Prompt- พารามิเตอร์ที่จำเป็น สตริงที่แสดงเป็นข้อความในกล่องโต้ตอบ ความยาวสูงสุดของพร้อมต์คือประมาณ 1024 อักขระ หากข้อความขยายไปมากกว่าหนึ่งบรรทัดเราสามารถแยกบรรทัดโดยใช้อักขระส่งคืนแคร่ (Chr (13)) หรืออักขระป้อนบรรทัด (Chr (10)) ระหว่างแต่ละบรรทัด
Title- พารามิเตอร์เสริม นิพจน์สตริงที่แสดงในแถบชื่อเรื่องของกล่องโต้ตอบ หากชื่อเรื่องถูกปล่อยว่างไว้ชื่อแอปพลิเคชันจะอยู่ในแถบชื่อเรื่อง
Default- พารามิเตอร์เสริม ข้อความเริ่มต้นในกล่องข้อความที่ผู้ใช้ต้องการให้แสดง
XPos- พารามิเตอร์เสริม ตำแหน่งของแกน X ซึ่งแสดงระยะห่างจากด้านซ้ายของหน้าจอในแนวนอน หากปล่อยว่างไว้ช่องป้อนข้อมูลจะอยู่กึ่งกลางแนวนอน
YPos- พารามิเตอร์เสริม ตำแหน่งของแกน Y ซึ่งแสดงระยะห่างจากด้านซ้ายของหน้าจอในแนวตั้ง หากปล่อยว่างไว้ช่องป้อนข้อมูลจะอยู่ตรงกลางในแนวตั้ง
helpfile- พารามิเตอร์เสริม นิพจน์สตริงที่ระบุไฟล์วิธีใช้เพื่อใช้จัดเตรียมวิธีใช้ที่คำนึงถึงบริบทสำหรับกล่องโต้ตอบ
context- พารามิเตอร์เสริม นิพจน์ตัวเลขที่ระบุหมายเลขบริบทวิธีใช้ที่กำหนดโดยผู้เขียนวิธีใช้ให้กับหัวข้อวิธีใช้ที่เหมาะสม หากมีการระบุบริบทจะต้องระบุ helpfile ด้วย
ตัวอย่าง
<!DOCTYPE html>
<html>
<body>
<script language = "vbscript" type = "text/vbscript">
' Input Box with only Prompt
InputBox("Enter a number")
' Input Box with a Title
a = InputBox("Enter a Number","Enter Value")
msgbox a
' Input Box with a Prompt,Title and Default value
a = InputBox("Enter a Number","Enter Value",123)
msgbox a
' Input Box with a Prompt,Title,Default and XPos
a = InputBox("Enter your name","Enter Value",123,700)
msgbox a
' Input Box with a Prompt,Title and Default and YPos
a = InputBox("Enter your name","Enter Value",123,,500)
msgbox a
</script>
</body>
</html>
เมื่อเรียกใช้สคริปต์ข้างต้นช่องป้อนข้อมูลจะปรากฏขึ้นและแสดงค่าที่ป้อนโดยผู้ใช้