Mengembalikan nilai Boolean yang mengindikasikan apakah Varian opsionalargumen telah dialihkan ke prosedur.
Sintaks
IsMissing( argname )
Argumen argname yang diperlukan berisi nama argumen prosedur Varian opsional.
Keterangan
Gunakan fungsi IsMissing untuk mendeteksi apakah argumen Varian opsional telah disediakan atau belum dalam memanggil prosedur. IsMissing mengembalikan True jika tidak ada nilai yang dilewatkan untuk argumen yang ditentukan; jika tidak, mengembalikan False. Jika IsMissing mengembalikan True untuk argumen, penggunaan argumen yang hilang dalam kode lain dapat menyebabkan kesalahan yang ditentukan pengguna. Jika IsMissing digunakan pada argumen ParamArray , maka selalu mengembalikan False. Untuk mendeteksi ParamArray kosong, uji untuk melihat apakah batas atas array kurang dari batas bawahnya.
Catatan: IsMissing tidak berfungsi pada tipe data sederhana (seperti Bilangan Bulat atau Ganda) karena, tidak seperti Varian, mereka tidak memiliki ketentuan untuk bit bendera "hilang". Karena itu, sintaks untuk argumen opsional yang diketik memungkinkan Anda menentukan nilai default. Jika argumen dihilangkan ketika prosedur dipanggil, maka argumen akan memiliki nilai default ini, seperti dalam contoh di bawah ini:
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.
Sub MySub(Optional MyVar As String = "specialvalue") If MyVar = "specialvalue" Then ' MyVar was omitted. Else ...End Sub
Dalam banyak kasus Anda bisa menghilangkan uji If MyVar sepenuhnya dengan membuat nilai default sama dengan nilai yang anda inginkan MyVar berisi jika pengguna menghilangkannya dari panggilan fungsi. Ini membuat kode Anda lebih ringkas dan efisien.
Contoh
Contoh ini menggunakan fungsi IsMissing untuk memeriksa apakah argumen opsional telah dikirimkan ke prosedur yang ditentukan pengguna. Perhatikan bahwa Argumen opsional kini dapat memiliki nilai dan tipe default selain Varian.
Dim ReturnValue' The following statements call the user-defined' function procedure.ReturnValue = ReturnTwice() ' Returns Null.ReturnValue = ReturnTwice(2) ' Returns 4.' Function procedure definition.Function ReturnTwice(Optional A) If IsMissing(A) Then ' If argument is missing, return a Null. ReturnTwice = Null Else ' If argument is present, return twice the value. ReturnTwice = A * 2 End IfEnd Function
