Fungsi StrComp di MS Access

Di Access, fungsi StrComp digunakan untuk membandingkan dua teks atau string. Hasil perbandingan berupa angka bulat dengan tipe data Variant (Integer).

Sintaks penulisan fungsi StrComp adalah sebagai berikut:

StrComp (String1, String2 [, Compare])

Keterangan:

String1 (Teks1 atau String1): wajib diisi, merupakan teks atau string pertama.
String2 (Teks2 atau String2): wajib diisi, merupakan teks atau string kedua.
Compare (Membandingkan): tidak wajib diisi, berisi nilai Integer yang menunjukkan jenis perbandingan yang digunakan saat mengevaluasi StrComp. Jika Compare bernilai Null, StrComp menampilkan pesan kesalahan. Nilai default Compare adalah Option Compare (-1).

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 StrComp

Jika	Maka Nilai StrComp
String1 < String2	-1
String1 sama dengan String2	0
String2 > String1	1
String1 dan String2 sama-sama bernilai Null	Null

Berikut ini adalah contoh penggunaan fungsi StrComp dalam VBA:

Dim strString1, strString2, NilaiStrComp 
strString1 = "ABCD"
strString2 = "abcd" 
NilaiStrComp = StrComp(strString1, strString2, 1)    ' bernilai 0.
NilaiStrComp = StrComp(strString1, strString2, 0)    ' bernilai -1.
NilaiStrComp = StrComp(strString1, strString2)    ' bernilai 1.