ส่งกลับ Long ที่มีตัวห้อยที่มีขนาดใหญ่ที่สุดที่พร้อมใช้งานสําหรับมิติที่ระบุของอาร์เรย์
ไวยากรณ์
UBound(arrayname [, dimension ] )
ไวยากรณ์ของฟังก์ชัน UBound มีอาร์กิวเมนต์ดังนี้
| อาร์กิวเมนต์ | คำอธิบาย |
|---|---|
| ชื่ออาร์เรย์ | จำเป็น ชื่อของตัวแปรแถวลําดับ เป็นไปตามแบบแผนการตั้งชื่อตัวแปรมาตรฐาน |
| มิติ | ไม่จำเป็น ตัวแปร (ยาว) จํานวนเต็มที่ระบุว่าขอบเขตบนของมิติใดที่จะถูกส่งกลับ ใช้ 1 สําหรับมิติแรก, 2 สําหรับมิติที่สอง และอื่นๆ ถ้าไม่ระบุ มิติ จะถือว่าเป็น 1 |
ข้อสังเกต
ฟังก์ชัน UBound จะใช้กับฟังก์ชัน LBound เพื่อกําหนดขนาดของอาร์เรย์ ใช้ฟังก์ชัน LBound เพื่อค้นหาขีดจํากัดล่างของมิติอาร์เรย์
UBound จะส่งกลับค่าต่อไปนี้สําหรับอาร์เรย์ที่มีมิติเหล่านี้:
Dim A(1 To 100, 0 To 3, -3 To 4)
| คำ สั่ง | ค่าที่ส่งกลับ |
|---|---|
UBound(A, 1) |
100 |
UBound(A, 2) |
3 |
UBound(A, 3) |
4 |
ตัวอย่าง
หมายเหตุ
ตัวอย่างต่อไปนี้จะสาธิตการใช้ฟังก์ชันนี้ในโมดูล Visual Basic for Applications (VBA) สําหรับข้อมูลเพิ่มเติมเกี่ยวกับการทํางานกับ VBA ให้เลือก การอ้างอิงสําหรับนักพัฒนา ในรายการดรอปดาวน์ที่อยู่ถัดจาก ค้นหา แล้วใส่คําอย่างน้อยหนึ่งคําในกล่องค้นหา
ตัวอย่างนี้ใช้ฟังก์ชัน UBound เพื่อกําหนดตัวห้อยที่พร้อมใช้งานที่ใหญ่ที่สุดสําหรับมิติที่ระบุของอาร์เรย์
Dim Upper
' Declare array variables.
Dim MyArray(1 To 10, 5 To 15, 10 To 20)
Dim AnyArray(10)
Upper = UBound(MyArray, 1) ' Returns 10.
Upper = UBound(MyArray, 3) ' Returns 20.
Upper = UBound(AnyArray) ' Returns 10.