Di Access, fungsi CallByName digunakan untuk menjalankan metode dari sebuah objek atau menampilkan properti sebuah objek.
Sintaks penulisan fungsi CallByName adalah sebagai berikut:
Keterangan:
Objek: Wajib diisi, tipe data Variant(Object), merupakan nama objek yang ada dalam fungsi yang akan dieksekusi.
NamaProperti: Wajib diisi, tipe data Variant(String), merupakan ekspresi string yang berisi nama properti atau metode dari objek.
Tipe: Wajib diisi, berupa konstanta tipe vbCallType yang mewakili tipe proesedur yang dipanggil.
Argumen (): Opsional atau tidak wajib diisi, tipe data Variant (Array).
Fungsi CallByName digunakan untuk mendapatkan atau menetapkan sebuah properti, atau untuk menjalankan sebuah metode dengan menggunakan nama string.
Contoh berikut ini dapat membantu menjelaskan penggunaan fungsi CallByName:
Dalam satuan Twips, 1 Inch= 1440 Twips
Dalam satuan Cm, 1 Inch= 2,54 Cm
Jadi dalam satuan Twips, 1 Cm= 1440/2,54 atau 566.929133858268 Twips. Angka 566.929133858268 Twips ini bila dibaca di Access (bukan di VBA) akan sama dengan 1 Cm.
Sintaks penulisan fungsi CallByName adalah sebagai berikut:
CallByName (Objek, NamaProperti, Tipe [, Argumen()])
Keterangan:
Objek: Wajib diisi, tipe data Variant(Object), merupakan nama objek yang ada dalam fungsi yang akan dieksekusi.
NamaProperti: Wajib diisi, tipe data Variant(String), merupakan ekspresi string yang berisi nama properti atau metode dari objek.
Tipe: Wajib diisi, berupa konstanta tipe vbCallType yang mewakili tipe proesedur yang dipanggil.
Argumen (): Opsional atau tidak wajib diisi, tipe data Variant (Array).
Fungsi CallByName digunakan untuk mendapatkan atau menetapkan sebuah properti, atau untuk menjalankan sebuah metode dengan menggunakan nama string.
Contoh berikut ini dapat membantu menjelaskan penggunaan fungsi CallByName:
CallByName Label5, "Caption", VbLet, "Tes"Mengatur/mengganti nilai properti Caption pada control yang bernama Label5 dari Text4 menjadi Tes. Lihat gambar di atas.
CallByName Text4, "Visible", VbLet, FalseMengatur properti Visible pada control yang bernama Text4 menjadi false. Dengan kata lain, menyembunyikan control yang bernama Text4 supaya tidak terbaca.
MsgBox CallByName(Text4, "Name", VbGet)Menampilkan nilai dari properti Name pada control yang bernama Text4.
CallByName Command1, "Move", VbMethod, 566.929133858268, 566.929133858268Memindahkan tombol perintah bernama Command1 ke Left= 1 Cm dan Right= 1 Cm. Untuk diketahui, VBA Access menggunakan satuan Twips untuk menghitung posisi atau panjang suatu objek:
Dalam satuan Twips, 1 Inch= 1440 Twips
Dalam satuan Cm, 1 Inch= 2,54 Cm
Jadi dalam satuan Twips, 1 Cm= 1440/2,54 atau 566.929133858268 Twips. Angka 566.929133858268 Twips ini bila dibaca di Access (bukan di VBA) akan sama dengan 1 Cm.
Comments
Post a Comment