Collabora Office 24.04 Βοήθεια
Επιστρέφει τη θέση μιας συμβολοσειράς μέσα σε μια άλλη συμβολοσειρά, ξεκινώντας από τη δεξιά πλευρά της συμβολοσειράς.
Η συνάρτηση InStrRev επιστρέφει τη θέση στην οποία βρέθηκε η συμφωνία, από τα δεξιά. Εάν η συμβολοσειρά δεν βρεθεί, η συνάρτηση επιστρέφει 0.
InStrRev (StringCheck As String, StringMatch As String [,Start As Long] [, Compare As Integer])
Long
StringCheck: Η έκφραση συμβολοσειράς που θέλετε να αναζητήσετε.
StringMatch: Η έκφραση συμβολοσειράς που θέλετε να αναζητήσετε.
Έναρξη:Προαιρετική αριθμητική παράσταση που σημειώνει τη θέση από τα αριστερά σε μια συμβολοσειρά όπου αναζητείται η έναρξη της συγκεκριμένης υποσυμβολοσειράς. Εάν παραλείψετε αυτήν την παράμετρο, η αναζήτηση ξεκινά από τον τελευταίο χαρακτήρα της συμβολοσειράς. Η μέγιστη επιτρεπόμενη τιμή είναι 65535.
Compare: Προαιρετική αριθμητική παράσταση που καθορίζει τον τύπο της σύγκρισης. Η τιμή αυτής της παραμέτρου μπορεί να είναι
1: Η προεπιλεγμένη τιμή 1 καθορίζει σύγκριση κειμένου χωρίς διάκριση πεζών-κεφαλαίων.
0: Η τιμή 0 καθορίζει μια δυαδική σύγκριση με διάκριση πεζών-κεφαλαίων.
Για να αποφύγετε ένα σφάλμα χρόνου εκτέλεσης, μην ορίσετε την παράμετρο Compare εάν παραληφθεί η πρώτη παράμετρος επιστροφής.
Sub ExamplePosition
Dim sInput As String
Dim iPos As Integer
sInput = "The book is on the table"
iPos = InStrRev(sInput,"the",10,1) ' Επιστρέφει 1, η αναζήτηση δεν κάνει διάκριση πεζών-κεφαλαίων
Print iPos
iPos = InStrRev(sInput,"the",10,0) ' Επιστρέφει 0, η αναζήτηση γίνεται με διάκριση πεζών-κεφαλαίων
Print iPos
End Sub