Fungsi StrComp

Catatan: Kami ingin secepatnya menyediakan konten bantuan terbaru dalam bahasa Anda. Halaman ini diterjemahkan menggunakan mesin dan mungkin terdapat kesalahan tata bahasa atau masalah keakuratan. Kami bertujuan menyediakan konten yang bermanfaat untuk Anda. Dapatkah Anda memberi tahu kami apakah informasi ini bermanfaat untuk Anda di bagian bawah halaman ini? Berikut artikel dalam bahasa Inggris untuk referensi.

Mengembalikan varian (bilangan bulat) menunjukkan hasil ekspresi string.

Sintaks

StrComp ( string1, string2 [membandingkan ] )

Sintaks fungsi StrComp memiliki argumen ini:

Argumen

Deskripsi

string1

Diperlukan. Ekspresi valid string apa pun.

string2

Diperlukan. Ekspresi valid string apa pun.

Bandingkan

Opsional. Menentukan jenis perbandingan Tring. Jika membandingkanargumen adalah nol, kesalahan terjadi. Jika membandingkan dihilangkan, pengaturan Opsi Bandingkan menentukan jenis perbandingan.


Pengaturan

Membandingkan argumen pengaturan ini:

Konstanta

Nilai

Deskripsi

vbBinaryCompare

0

Melakukan perbandingan biner.

vbTextCompare

1

Melakukan perbandingan terdiri dari teks.

vbDatabaseCompare

2

Microsoft Office Access 2007 saja. Melakukan perbandingan yang didasarkan pada informasi dalam database Anda.


Nilai yang dikembalikan

Fungsi StrComp memiliki nilai pengembalian berikut ini:

Jika

StrComp mengembalikan

string1 kurang dari string2

-1

string1 adalah sama dengan string2

0

string1 adalah lebih besar dari string2

1

string1 atau string2 adalah nol

Null


Contoh

Catatan: Contoh yang diikuti menunjukkan penggunaan fungsi ini dalam Visual Basic for Applications (VBA) modul.

Contoh ini menggunakan fungsi StrComp untuk mengembalikan hasil perbandingan Tring. Jika argumen ketiga adalah 1, perbandingan terdiri dari teks yang 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.
Kembangkan keterampilan Office Anda
Jelajahi pelatihan
Dapatkan fitur baru terlebih dahulu
Gabung ke Office Insiders

Apakah informasi ini bermanfaat?

Terima kasih atas umpan balik Anda!

Terima kasih atas umpan balik Anda! Sepertinya menghubungkan Anda ke salah satu agen dukungan Office kami akan sangat membantu.

×