Mengembalikan Long yang berisi subskrip terbesar yang tersedia untuk dimensi array yang ditunjukkan.
Sintaks
UBound(arrayname [, dimensi ] )
Sintaks fungsi UBound memiliki argumen berikut:
| Argumen | Deskripsi |
|---|---|
| array name | Diperlukan. Nama variabel array; mengikuti konvensi penamaan variabel standar. |
| dimensi | Opsional. Varian (Panjang). Bilangan bulat yang menunjukkan batas atas dimensi mana yang dikembalikan. Gunakan 1 untuk dimensi pertama, 2 untuk dimensi kedua, dan seterusnya. Jika dimensi dikosongkan, 1 diasumsikan. |
Keterangan
Fungsi UBound digunakan dengan fungsi LBound untuk menentukan ukuran array. Gunakan fungsi LBound untuk menemukan batas bawah dimensi array.
UBound mengembalikan nilai berikut untuk array dengan dimensi berikut:
Dim A(1 To 100, 0 To 3, -3 To 4)
| Pernyataan | Nilai yang Dikembalikan |
|---|---|
UBound(A, 1) |
100 |
UBound(A, 2) |
3 |
UBound(A, 3) |
4 |
Contoh
Catatan
Contoh yang mengikuti demonstrasi penggunaan fungsi ini dalam modul Visual Basic for Applications (VBA). Untuk informasi selengkapnya tentang bekerja dengan VBA, pilih Referensi Pengembang di daftar turun bawah di samping Cari dan masukkan satu istilah atau lebih di kotak pencarian.
Contoh ini menggunakan fungsi UBound untuk menentukan subskrip terbesar yang tersedia untuk dimensi array yang ditunjukkan.
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.