Isi
Indeks 🔎︎

# 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 (Text1 As String, Text2 As String [,Start As Long] [, Compare As Integer])

### Nilai balikan:

Long

### Parameter:

Ekspresi1, Ekspresi2: Ekspresi apa saja yang hendak dibandingkan.

Ekspresi1, Ekspresi2: Ekspresi apa saja yang hendak dibandingkan.

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.

Untuk menghindari galat run-time, jangan atur parameter Pembanding jika parameter pengembalian pertama dihilangkan.

### 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