Isi

# Fungsi InStrRev [VBA]

Mengembalikan posisi string dalam string lain, dimulai dari sisi kanan string.

This constant, function or object is enabled with the statement Option VBASupport 1 placed before the executable program code in a module.

Fungsi InStrRev mengembalikan posisi saat kecocokan ditemukan, dari kanan. Jika string tidak ditemukan, fungsi mengembalikan 0.

### Sintaksis:

    InStrRev (StringCheck As String, StringMatch As String [,Start As Long] [, Compare As Integer])

### Return type:

Long

### Parameter:

StringCheck: The string expression that you want to search.

StringMatch: The string expression that you want to search for.

Mulai: Ekspresi numerik opsional yang menandai posisi dari kiri dalam string tempat pencarian substring yang ditentukan dimulai. Jika Anda menghilangkan parameter ini, pencarian dimulai pada karakter terakhir dari string. Nilai maksimum yang dibolehkan adalah 65535.

Membandingkan:Ekspresi numerik opsional yang menentukan jenis perbandingan. Nilai parameter ini dapat berupa

1: Nilai baku 1 menentukan perbandingan teks yang tidak peka huruf besar-kecil.

0: Nilai 0 menentukan perbandingan biner yang peka terhadap huruf besar-kecil.

To avoid a run-time error, do not set the Compare parameter if the first return parameter is omitted.

### Kode kesalahan:

5 Tidak sah dalam pemanggilan prosedur

### Contoh:

    Sub ExamplePosition
    Dim sInput As String
    Dim iPos As Integer
     sInput = "The book is on the table"
     iPos = InStrRev(sInput,"the",10,1) ' Returns 1, search is case-insensitive
     Print iPos
     iPos = InStrRev(sInput,"the",10,0) ' Returns 0, search is case-sensitive
     Print iPos
    End Sub

Topik Terkait

InStr