Mengembalikan Varian (Bilangan Bulat) yang mengindikasikan hasil ekspresi string.
Sintaks
StrComp ( string1, string2 [, bandingkan ] )
Sintaks fungsi StrComp memiliki argumen ini:
Argumen |
Deskripsi |
---|---|
string1 |
Diperlukan. Ekspresi string apa pun yang valid. |
string2 |
Diperlukan. Ekspresi string apa pun yang valid. |
bandingkan |
Opsional. Menentukan tipe perbandingan string. Jika argumen bandingkan adalah Null, kesalahan akan terjadi. Jika bandingkan dihilangkan, pengaturan Perbandingan Opsi menentukan tipe perbandingan. |
Pengaturan
Pengaturan argumen bandingkan adalah:
Konstanta |
Nilai |
Deskripsi |
---|---|---|
vbBinaryCompare |
0 |
Melakukan perbandingan biner. |
vbTextCompare |
1 |
Melakukan perbandingan tekstual. |
Nilai yang Dikembalikan
Fungsi StrComp memiliki nilai yang dikembalikan berikut:
Jika |
Pengembalian StrComp |
---|---|
string1 lebih kecil dari string2 |
-1 |
string1 sama dengan string2 |
0 |
string1 lebih besar dari string2 |
1 |
string1 atau string2 adalah Null |
Null |
Contoh kueri
Ekspresi |
Hasil |
---|---|
SELECT ProductSales.ProductID, StrComp(ProductID,"PRO_XYZ10") AS ComparisonResult FROM ProductSales; |
Mengembalikan nilai dari bidang "PRODUCTID", membandingkan nilai dalam "PRODUCTID" dengan "PRO_XYZ1" dan mengembalikan hasil dalam kolom ComparisonResult. "ProductID" sama dengan "PRO_XYZ10", fungsi StrComp akan mengembalikan 0. Jika "PRODUCTID" kurang dari "PRO_XYZ10", fungsi StrComp akan mengembalikan -1. Jika "PRODUCTID" lebih besar dari "PRO_XYZ10", fungsi StrComp akan mengembalikan 1. Jika "ProductID" atau "PRO_XYZ10" adalah NULL, fungsi StrComp akan mengembalikan NULL. |
Contoh VBA
Catatan: Contoh yang mengikuti demonstrasi penggunaan fungsi ini dalam modul Visual Basic for Applications (VBA).
Contoh ini menggunakan fungsi StrComp untuk mengembalikan hasil perbandingan string. Jika argumen ketiga adalah 1, perbandingan tekstual dilakukan; jika argumen ketiga adalah 0 atau dihilangkan, perbandingan biner dilakukan.
Dim MyStr1, MyStr2, MyComp
MyStr1 = "ABCD": MyStr2 = "abcd" ' Define variables.
MyComp = StrComp(MyStr1, MyStr2, 1) ' Returns 0.
MyComp = StrComp(MyStr1, MyStr2, 0) ' Returns -1.
MyComp = StrComp(MyStr2, MyStr1) ' Returns 1.