แสดงพร้อมท์ในกล่องโต้ตอบ รอให้ผู้ใช้ใส่ข้อความหรือคลิกปุ่ม และส่งกลับสตริงที่มีเนื้อหาของกล่องข้อความ
ไวยากรณ์
InputBox(พร้อมท์ [, ชื่อเรื่อง ] [, ค่าเริ่มต้น ] [, xpos ] [, ypos ] [, ไฟล์วิธีใช้ ] [, บริบท ] )
ไวยากรณ์ของฟังก์ชัน InputBox มีอาร์กิวเมนต์ดังนี้
| อาร์กิวเมนต์ | คำอธิบาย |
|---|---|
| พร้อมท์ | จำเป็น นิพจน์สตริงที่แสดงเป็นข้อความในกล่องโต้ตอบ ความยาวสูงสุดของ พร้อมท์ คือประมาณ 1024 อักขระ ขึ้นอยู่กับความกว้างของอักขระที่ใช้ ถ้าพร้อมท์มีมากกว่าหนึ่งบรรทัด คุณสามารถแยกบรรทัดโดยใช้อักขระขึ้นบรรทัดใหม่ (Chr(13)) อักขระตัวดึงบรรทัด (Chr(10)) หรืออักขระค่าขนส่งกลับและตัวดึงบรรทัด (Chr(13) & Chr(10)) ระหว่างแต่ละบรรทัด |
| ชื่อเรื่อง | ไม่จำเป็น นิพจน์สตริงที่แสดงในแถบชื่อเรื่องของกล่องโต้ตอบ ถ้าคุณละชื่อ เรื่องไว้ ชื่อแอปพลิเคชันจะถูกวางในแถบชื่อเรื่อง |
| เริ่มต้น | ไม่จำเป็น นิพจน์สตริงที่แสดงในกล่องข้อความเป็นการตอบสนองเริ่มต้น ถ้าไม่มีการป้อนข้อมูลอื่น ถ้าคุณละ ไว้ซึ่งค่าเริ่มต้น กล่องข้อความจะแสดงความว่างเปล่า |
| เอ็กซ์โพส | ไม่จำเป็น นิพจน์ตัวเลขที่ระบุระยะห่างในแนวนอนของขอบด้านซ้ายของกล่องโต้ตอบจากขอบด้านซ้ายของหน้าจอเป็นหน่วยทวิป ถ้าละ xpos กล่องโต้ตอบจะจัดกึ่งกลางแนวนอน |
| YPOS | ไม่จำเป็น นิพจน์ตัวเลขที่ระบุระยะห่างในแนวตั้งของขอบด้านบนของกล่องโต้ตอบจากด้านบนของหน้าจอเป็นทวิป ถ้าไม่ใส่ ypos กล่องโต้ตอบจะอยู่ในตําแหน่งแนวตั้งประมาณหนึ่งในสามของหน้าจอ |
| ไฟล์วิธีใช้ | ไม่จำเป็น นิพจน์สตริงที่ระบุไฟล์วิธีใช้ที่จะใช้เพื่อแสดงวิธีใช้ตามบริบทสําหรับกล่องโต้ตอบ ถ้ามี ไฟล์วิธีใช้ จะต้องระบุ บริบท ด้วย |
| บริบท | ไม่จำเป็น นิพจน์ตัวเลขที่เป็นหมายเลขบริบทวิธีใช้ที่ผู้เขียนวิธีใช้กําหนดให้กับหัวข้อวิธีใช้ที่เหมาะสม ถ้าระบุ บริบท แล้ว ต้องระบุ ไฟล์วิธีใช้ ด้วย |
ข้อสังเกต
เมื่อมีทั้งไฟล์วิธีใช้และบริบท ผู้ใช้สามารถกด F1 (Windows) หรือวิธีใช้ (Macintosh) เพื่อดูหัวข้อวิธีใช้ที่สอดคล้องกับบริบท แอปพลิเคชันโฮสต์บางรายการยังเพิ่มปุ่ม วิธีใช้ ลงในกล่องโต้ตอบโดยอัตโนมัติด้วย ถ้าผู้ใช้คลิก ตกลง หรือกด ENTER ฟังก์ชัน InputBox จะส่งกลับสิ่งที่อยู่ในกล่องข้อความ ถ้าผู้ใช้คลิก ยกเลิก ฟังก์ชันจะส่งกลับสตริงที่มีความยาวเป็นศูนย์ ("")
หมายเหตุ
เมื่อต้องการระบุมากกว่าอาร์กิวเมนต์ที่มีชื่อแรก คุณต้องใช้ InputBox ในนิพจน์ ถ้าต้องการละเว้นอาร์กิวเมนต์ที่ใช้ระบุตําแหน่งบางอาร์กิวเมนต์ คุณต้องใส่ตัวคั่นเครื่องหมายจุลภาคที่สอดคล้องกันไว้ด้วย
ตัวอย่าง
หมายเหตุ
ตัวอย่างต่อไปนี้จะสาธิตการใช้ฟังก์ชันนี้ในโมดูล Visual Basic for Applications (VBA) สําหรับข้อมูลเพิ่มเติมเกี่ยวกับการทํางานกับ VBA ให้เลือก การอ้างอิงนักพัฒนาในรายการ ดรอปดาวน์ที่อยู่ถัดจาก ค้นหา แล้วใส่คําอย่างน้อยหนึ่งคําในกล่องค้นหา
ตัวอย่างนี้แสดงวิธีการต่างๆ ในการใช้ฟังก์ชัน InputBox เพื่อพร้อมท์ให้ผู้ใช้ใส่ค่า ถ้าละตําแหน่ง x และ y กล่องโต้ตอบจะอยู่กึ่งกลางแกนที่เกี่ยวข้องโดยอัตโนมัติ ตัวแปรมี MyValue ค่าที่ผู้ใช้ใส่ ถ้าผู้ใช้คลิก ตกลง หรือกดแป้น ENTER ถ้าผู้ใช้คลิก ยกเลิก สตริงความยาวเป็นศูนย์จะถูกส่งกลับ
Dim Message, Title, Default, MyValue
Message = "Enter a value between 1 and 3" ' Set prompt.
Title = "InputBox Demo" ' Set title.
Default = "1" ' Set default.
' Display message, title, and default value.
MyValue = InputBox(Message, Title, Default)
' Use Helpfile and context.
' The Help button is added automatically.
MyValue = InputBox(Message, Title,,,,"DEMO.HLP", 10)
' Display dialog box at position 100, 100.
MyValue = InputBox(Message, Title, Default, 100, 100)