Fungsi UBound

Catatan: Kami ingin secepatnya menyediakan konten bantuan terbaru dalam bahasa Anda. Halaman ini diterjemahkan menggunakan mesin dan mungkin terdapat kesalahan tata bahasa atau masalah keakuratan. Kami bertujuan menyediakan konten yang bermanfaat untuk Anda. Dapatkah Anda memberi tahu kami apakah informasi ini bermanfaat untuk Anda di bagian bawah halaman ini? Berikut artikel dalam bahasa Inggris untuk referensi.

Mengembalikan lama yang berisi terbesar subskrip tersedia untuk dimensi yang ditunjukkan larik.

Sintaks

UBound ( arrayname [dimensi ] )

Sintaks fungsi UBound memiliki argumen ini:

Argumen

Deskripsi

arrayname

Diperlukan. Nama array variabel; Berikut standar konvensi penamaan variabel.

dimensi

Opsional. Varian (Panjang). Bilangan bulat menunjukkan batas atas dimensi yang dikembalikan. Menggunakan 1 untuk dimensi yang pertama, 2 untuk kedua, dan lain sebagainya. Jika dimensi dihilangkan, 1 diasumsikan.


Keterangan

Fungsi UBound digunakan dengan fungsi LBound untuk menentukan ukuran dari array. Gunakan fungsi LBound untuk menemukan batas Dimensi array.

UBound mengembalikan nilai berikut ini untuk array dengan dimensi ini:

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 terbesar subskrip tersedia untuk dimensi yang ditunjukkan sebuah array.

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.
Kembangkan keterampilan Office Anda
Jelajahi pelatihan
Dapatkan fitur baru terlebih dahulu
Gabung ke Office Insiders

Apakah informasi ini bermanfaat?

Terima kasih atas umpan balik Anda!

Terima kasih atas umpan balik Anda! Sepertinya menghubungkan Anda ke salah satu agen dukungan Office kami akan sangat membantu.

×