Di Access, fungsi InStr digunakan untuk menentukan posisi pertama saat sebuah string atau teks ditemukan dalam sebuah kumpulan teks. Nilai yang dihasilkan dari fungsi InStr adalah Variant (Long).
Sintaks penulisan fungsi InStr adalah sebagai berikut:
Keterangan:
Start (Awal): bersifat opsional, berupa ekspresi numerik (angka) yang menyatakan posisi awal saat sebuah teks dicari. Jika bernilai kosong, pencarian teks dimulai dari posisi pertama. Jika bernilai Null, fungsi InStr akan mengalami kesalahan. Nilai Start harus diisi jika Compare digunakan.
String1 (String1), String2 (String2): Wajib diisi, merupakan string yang ingin dicari.
Compare (Membandingkan): bersifat opsional, digunakan untuk menentukan tipe perbandingan string. Nilai defaultnya 1. Jika nilai Compare sama dengan Null, maka pengaturan OptionCompare menentukan tipe perbandingan.
Pengaturan Compare
Nilai InStr
Catatan
Selain fungsi InStr, ada juga fungsi InStrB. Fungsi InStrB digunakan pada data byte yang ada dalam sebuah string. Bila ada InStr, nilai yang dihasilkan adalah posisi karakter dari saat pertama kalinya sebuah string ditemukan, maka pada InStrB, nilai yang dihasilkan adalah posisi byte.
Berikut ini adalah contoh penggunaan fungsi InStr.
Mencari karakter titik (".") pada sebuah alamat IP.
Contoh lain
Sintaks penulisan fungsi InStr adalah sebagai berikut:
InStr ([Start, ] String1, String2 [, Compare ] )
Keterangan:
Start (Awal): bersifat opsional, berupa ekspresi numerik (angka) yang menyatakan posisi awal saat sebuah teks dicari. Jika bernilai kosong, pencarian teks dimulai dari posisi pertama. Jika bernilai Null, fungsi InStr akan mengalami kesalahan. Nilai Start harus diisi jika Compare digunakan.
String1 (String1), String2 (String2): Wajib diisi, merupakan string yang ingin dicari.
Compare (Membandingkan): bersifat opsional, digunakan untuk menentukan tipe perbandingan string. Nilai defaultnya 1. Jika nilai Compare sama dengan Null, maka pengaturan OptionCompare menentukan tipe perbandingan.
Pengaturan Compare
Konstanta | Nilai | Keterangan |
vbUseCompareOption | -1 | Melakukan perbandingan dengan menggunakan pengaturan Option Compare (biasanya pernyataan Option Compare berada di awal VBA). |
vbBinaryCompare | 0 | Melakukan perbandingan biner. |
vbTextCompare | 1 | Melakukan perbandingan tekstual. |
vbDatabaseCompare | 2 | Khusus untuk Microsoft Office Access 2007. Melakukan perbandingan berdasarkan informasi yang ada dalam database. |
Nilai InStr
Jika | Maka Nilai InStr |
string1 bernilai string dengan panjang nol (atau "") | 0 |
string1 bernilai Null | Null |
string2 bernilai bernilai string dengan panjang nol (atau "") | start |
string2 bernilai Null | Null |
string2 tidak ditemukan | 0 |
string2 ada di dalam string1 | berupa angka Variant (Long) yang menunjukkan posisi string2 ditemukan. |
start > string2 | 0 |
Catatan
Selain fungsi InStr, ada juga fungsi InStrB. Fungsi InStrB digunakan pada data byte yang ada dalam sebuah string. Bila ada InStr, nilai yang dihasilkan adalah posisi karakter dari saat pertama kalinya sebuah string ditemukan, maka pada InStrB, nilai yang dihasilkan adalah posisi byte.
Berikut ini adalah contoh penggunaan fungsi InStr.
Mencari karakter titik (".") pada sebuah alamat IP.
? InStr(1,"20.167.1.199",".",vbBinaryCompare) 'dimulai dari karakter pertama ("2") 3Pada contoh di atas, dengan posisi Start bernilai 1, karakter titik ditemukan pertama kalinya di posisi ke tiga. Karakter pertama adalah 2, karakter kedua adalah 0 dan karakter ketiga adalah ..
? Instr(5,"20.167.1.199",".",vbBinaryCompare) 'dimulai dari karakter ke-lima ("6") 7Pada contoh di atas, dengan posisi Start bernilai 5, karakter titik ditemukan pertama kalinya di posisi ke tujuh. Karakter pertama adalah 5, karakter kedua adalah 7, dan karakter ketiga adalah .. Tiga pada posisi yang ada di fungsi Instr(5,"20.167.1.199",".",vbBinaryCompare), yaitu "67." ditambah dengan 4 posisi pertama dari "20.1" sama dengan tujuh. Daalam hal ini, empat karakter pertama, "20.1" ikut dihitung.
Contoh lain
? Instr(1,"XXpXXpXXPXXP","P",vbBinaryCompare) 9Karakter P (huruf besar) secara biner ditemukan pada posisi ke sembilan
? Instr(1,"XXpXXpXXPXXP","P",vbTextCompare) 3Karakter p atau P (huruf kecil atau huruf besar, mana yang ditemukan lebih dulu) secara teks ditemukan pada posisi ke tiga.
? Instr(4,"XXpXXpXXPXXP","P") 6
Comments
Post a Comment