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>

เมื่อเรียกใช้สคริปต์ข้างต้นช่องป้อนข้อมูลจะปรากฏขึ้นและแสดงค่าที่ป้อนโดยผู้ใช้