Fungsi InStrRev di MS Acccess

Di Access, fungsi InStrRev digunakan untuk menentukan posisi pertama saat sebuah string atau teks ditemukan yang dimulai dari akhir teks (karakter paling kanan), dalam sebuah kumpulan teks. Nilai yang dihasilkan dari fungsi InStrRev adalah Variant (Long).
Sintaks penulisan fungsi InStrRev adalah sebagai berikut:

InStrRev (Stringcheck,  Stringmatch [, Start[, Compare ] )

Keterangan:

Stringcheck (teks tempat mencari): wajib diisi, berupa ekspresi tempat mencari teks,

Stringmatch (teks yang dicari): wajib diisi, berupa ekspresi teks yang dicari,

Start (mulai): tidak wajib diisi (opsional), berupa ekspresi numerik yang menjadi awal mula pencarian. Jika tidak digunakan, nilainya -1, yang berarti pencarian teks dimulai dari karakter paling akhir dari Stringcheck. Jika bernilai Null InStrRev akan menampilkan pesan kesalahan.

Compare (Membandingkan): bersifat opsional, digunakan untuk menentukan tipe perbandingan string. Nilai defaultnya 0. 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 InStrRev
Stringmatch bernilai Null	Null
Stringcheck bernilai Null	Null
Stringcheck bernilai bernilai string dengan panjang nol (atau "")	0
Stringmatch bernilai string dengan panjang nol (atau "")	sama dengan nilai Start
Stringmatch tidak ditemukan	0
Stringmatch ada di dalam Stringcheck	berupa angka Variant (Long) yang menunjukkan posisi Stringmatch ditemukan, dihitung dari awal Stringcheck.
start > Len(stringmatch)	0

Berikut ini adalah contoh penggunaan fungsi InStrRev.

Mencari karakter titik (".") pada sebuah alamat IP.

? InStrRev("20.167.1.199",".") 'dimulai dari karakter pertama dari sebelah kanan ("9")
 9 'karakter "." ada di urutan ke-9 dari sebelah kiri

Pada contoh di atas, dengan posisi Start bernilai -1, karakter titik ditemukan pertama kalinya di posisi ke sembilan. Karakter pertama dan ke dua adalah 9, karakter ke tiga adalah 1 dan karakter ke empat adalah .. Dihitung dari sebelah kiri, karakter "." berada di urutan sembilan.

? InstrRev("20.167.1.199",".",4)  'dimulai dari karakter ke empat ("1")
 3 'karakter "." ada di urutan ke-3 dari sebelah kiri

Pada contoh di atas, dengan posisi Start bernilai 4, karakter titik ditemukan pertama kalinya di posisi ke tiga. Karakter pertama adalah 2, karakter kedua adalah 0, dan karakter ketiga adalah ..

Contoh lain

? InstrRev("XXpXXpXXPXXP","P",4,vbBinaryCompare)
 0 

Karakter P (huruf besar), dimulai dari karakter ke empat, secara biner tidak ditemukan

? Instrrev("XXpXXpXXPXXP","P",,vbTextCompare)
 12  

Karakter p atau P (huruf kecil atau huruf besar, mana yang ditemukan lebih dulu) secara teks ditemukan pada posisi ke-12.

? Instrrev("XXQXXpXXPXXP","Q",4, vbBinaryCompare)
 3  

Karakter Q (huruf besar), dimulai dari karakter ke empat, secara biner ditemukan pada posisi ke tiga