Hàm InStrRev() trong VBA

Hàm InStrRev() trong VBA trả về vị trí của lần xuất hiện đầu tiên của một chuỗi trong một chuỗi khác. Tìm kiếm xảy ra từ phải sang trái.

Cú pháp:

InStrRev(string1,string2[,start,[compare]])

Mô tả các tham số:

• string1: Tham số bắt buộc. Chuỗi được tìm kiếm.
• string2: Tham số bắt buộc. Chuỗi mà String1 được tìm kiếm.
• start: Tham số tùy chọn. Một tham số tùy chọn. Chỉ định vị trí bắt đầu cho tìm kiếm. Việc tìm kiếm bắt đầu ở vị trí đầu tiên từ phải sang trái.

• compare: Tham số tùy chọn. Chỉ định so sánh chuỗi được sử dụng. Nó có thể có các giá trị được đề cập sau đây.

  0 = vbBinaryCompare – Thực hiện so sánh nhị phân (mặc định).
  1 = vbTextCompare – Thực hiện so sánh kiểu văn bản.

Ví dụ sử dụng hàm InStrRev() trong VBA

Sub vidu_ham_InStrRev()
   Dim var As Variant
   var = "Microsoft VBScript"
   Cells(1, 1) = ("Line 1 : " & InStrRev(var, "s", 10))
   Cells(2, 1) = ("Line 2 : " & InStrRev(var, "s", 7))
   Cells(3, 1) = ("Line 3 : " & InStrRev(var, "f", -1, 1))
   Cells(4, 1) = ("Line 4 : " & InStrRev(var, "t", 5))
   Cells(5, 1) = ("Line 5 : " & InStrRev(var, "i", 7))
   Cells(6, 1) = ("Line 6 : " & InStrRev(var, "i", 7))
   Cells(7, 1) = ("Line 7 : " & InStrRev(var, "VB", 1))
End Sub

Kết quả:

Line 1 : 6
Line 2 : 6
Line 3 : 8
Line 4 : 0
Line 5 : 2
Line 6 : 2
Line 7 : 0