ฟังก์ชัน InputBox() ใช้ใน VB เพื่อแสดงกล่องโต้ตอบ ทำให้ผู้ใช้สามารถป้อนค่าในกล่องโต้ตอบเพื่อส่งกลับไปยังโปรแกรมเพื่อประมวลผลได้ รูปแบบไวยากรณ์ของฟังก์ชัน InputBox() เป็นดังนี้:
InputBox(prompt[, title] [, default] [, xpos] [, ypos] [, helpfile, context])
พารามิเตอร์ในรูปแบบไวยากรณ์ของฟังก์ชัน InputBox มีความหมายดังต่อไปนี้:
(1) พารามิเตอร์พร้อมต์: จำเป็นต้องมีพารามิเตอร์นี้ ส่วนใหญ่เป็นนิพจน์สตริงที่ปรากฏในกล่องโต้ตอบ ความยาวสูงสุดของพร้อมต์คือประมาณ 1,024 อักขระ ซึ่งกำหนดโดยความกว้างของอักขระที่ใช้ หากข้อความแจ้งมีหลายบรรทัด คุณสามารถใช้การขึ้นบรรทัดใหม่ (Chr(13)) การป้อนบรรทัด (Chr(10)) หรือการขึ้นบรรทัดใหม่และการป้อนบรรทัดร่วมกัน (Chr(13) & Chr(10)) ระหว่าง เส้น. เพื่อแยก.
(2) ชื่อเรื่องเป็นทางเลือก แสดงนิพจน์สตริงในแถบชื่อเรื่องของกล่องโต้ตอบ หากละเว้นชื่อเรื่อง ชื่อแอปพลิเคชันจะอยู่ในแถบชื่อเรื่อง
(3) ตัวเลือกเริ่มต้น แสดงนิพจน์สตริงในกล่องข้อความเป็นค่าเริ่มต้นเมื่อไม่มีการป้อนข้อมูลอื่น หากละเว้นค่าเริ่มต้น กล่องข้อความจะว่างเปล่า
(4) Xpos เป็นตัวเลือก นิพจน์ตัวเลขซึ่งปรากฏเป็นคู่ จะระบุระยะห่างในแนวนอนระหว่างด้านซ้ายของกล่องโต้ตอบและด้านซ้ายของหน้าจอ ถ้าละเว้น xpos กล่องโต้ตอบจะจัดกึ่งกลางแนวนอน
(5) ใช่หรือไม่ก็ได้ นิพจน์ตัวเลขซึ่งปรากฏเป็นคู่ จะระบุระยะห่างระหว่างขอบด้านบนของกล่องโต้ตอบและขอบด้านบนของหน้าจอ ถ้าละเว้น ypos กล่องโต้ตอบจะถูกวางประมาณหนึ่งในสามในแนวตั้งจากด้านล่างของหน้าจอ
(6) ไฟล์ช่วยเหลือเป็นทางเลือก นิพจน์สตริงที่ระบุไฟล์วิธีใช้ที่ใช้เพื่อให้ความช่วยเหลือตามบริบทสำหรับกล่องโต้ตอบ หากมีไฟล์ช่วยเหลือ จะต้องระบุบริบทด้วย
(7) บริบทเป็นตัวเลือก นิพจน์ตัวเลขที่เป็นหมายเลขบริบทวิธีใช้ที่กำหนดให้กับหัวข้อวิธีใช้โดยผู้เขียนไฟล์วิธีใช้ หากมีการระบุบริบท จะต้องระบุไฟล์ช่วยเหลือด้วย
สิ่งที่ควรทราบ:
หากมีทั้งไฟล์ช่วยเหลือและบริบท ผู้ใช้สามารถกด F1 เพื่อดูหัวข้อวิธีใช้ที่สอดคล้องกับบริบท แอปพลิเคชันโฮสต์บางตัว เช่น Microsoft Excel จะเพิ่มปุ่มวิธีใช้ลงในกล่องโต้ตอบโดยอัตโนมัติ ถ้าผู้ใช้คลิกตกลงหรือกด ENTER ฟังก์ชัน InputBox จะส่งกลับเนื้อหาของกล่องข้อความ ถ้าผู้ใช้คลิกยกเลิก ฟังก์ชันนี้จะส่งคืนสตริงที่มีความยาวเป็นศูนย์ ()
หากคุณต้องการระบุพารามิเตอร์อื่นนอกเหนือจากพารามิเตอร์ที่มีชื่อแรก คุณต้องใช้กล่องป้อนข้อมูลในนิพจน์ หากคุณต้องการละเว้นพารามิเตอร์ตำแหน่งบางอย่าง คุณต้องรวมตัวคั่นด้วยเครื่องหมายจุลภาคที่เกี่ยวข้อง
การใช้อ้างอิง:
'ฟังก์ชั่นของโปรแกรมคือการใช้ฟังก์ชั่นกล่องอินพุตเพื่อป้อนข้อมูลสองรายการและเชื่อมต่อเข้าด้วยกัน ใช้ msgbox a & b
Dim a As String, b As String
คำสั่งย่อยส่วนตัว1_คลิก()
a = InputBox(ป้อนข้อมูลแรก :)
b = InputBox(ป้อนข้อมูลที่สอง :)
จบหมวดย่อย
คำสั่งย่อยส่วนตัว2_คลิก()
MsgBox เอ แอนด์ บี
จบหมวดย่อย