Mengembalikan Varian (Bilangan Bulat) yang menunjukkan hasil dari ekspresi string.
Sintaks
StrComp(string1, string2 [, bandingkan ] )
Sintaks fungsi StrComp memiliki argumen berikut:
| Argumen | Deskripsi |
|---|---|
| string1 | Diperlukan. Ekspresi string apa pun yang valid. |
| string2 | Diperlukan. Ekspresi string apa pun yang valid. |
| bandingkan | Opsional. Menentukan jenis perbandingan string. Jika argumen bandingkanadalah Null, kesalahan akan terjadi. Jika perbandingan dikosongkan, pengaturan Opsi Perbandingan menentukan tipe perbandingan. |
Pengaturan
Pengaturan argumen perbandingan adalah:
| Konstanta | Value | Deskripsi |
|---|---|---|
| vbBinaryCompare | 0 | Melakukan perbandingan biner. |
| vbTextCompare | 1 | Melakukan perbandingan tekstual. |
Mengembalikan nilai
Fungsi StrComp memiliki nilai pengembalian sebagai berikut:
| Jika | StrComp mengembalikan |
|---|---|
| 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 |
|---|---|
| PILIH ProductSales.ProductID, StrComp(ProductID,"PRO_XYZ10") SEBAGAI PerbandinganHasil DARI 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 menghasilkan 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.