Επιστρέφει μια Μεταβλητή (Ακέραιος) που περιέχει έναν καθορισμένο αριθμό χαρακτήρων από μια συμβολοσειρά.
Σύνταξη
Mid( συμβολοσειρά; έναρξη [, μήκος ] )
Η σύνταξη της συνάρτησης Mid περιλαμβάνει τα παρακάτω ορίσματα:
|
Όρισμα |
Περιγραφή |
|
συμβολοσειρά |
Υποχρεωτικό. παράσταση συμβολοσειράς από την οποία επιστρέφονται χαρακτήρες. Εάν το όρισμα συμβολοσειρά περιέχει την τιμή Null, τότε επιστρέφεται η τιμή Null . |
|
έναρξη |
Υποχρεωτικό. Μεγάλη. Η θέση χαρακτήρα στη συμβολοσειρά στην οποία αρχίζει το τμήμα που θα ληφθεί. Εάν το όρισμα έναρξη είναι μεγαλύτερο από τον αριθμό των χαρακτήρων της συμβολοσειράς, η συνάρτηση Mid επιστρέφει μια συμβολοσειρά μηδενικού μήκους (""). |
|
length |
Προαιρετικό. Μεταβλητή (Μεγάλης ακρίβειας). Αριθμός των χαρακτήρων που θα επιστραφούν. Εάν παραλειφθεί ή εάν υπάρχουν λιγότεροι χαρακτήρες από το μήκος στο κείμενο (συμπεριλαμβανομένου του χαρακτήρα στην αρχή), επιστρέφονται όλοι οι χαρακτήρες από τη θέση έναρξης μέχρι το τέλος της συμβολοσειράς. |
Παρατηρήσεις
Για να προσδιορίσετε τον αριθμό των χαρακτήρων στη συμβολοσειρά, χρησιμοποιήστε τη συνάρτηση Len .
Σημείωση: Χρησιμοποιήστε τη συνάρτηση MidB με δεδομένα byte που περιέχονται σε μια συμβολοσειρά, όπως στις γλώσσες συνόλου χαρακτήρων των δύο byte. Αντί να καθορίσουν τον αριθμό των χαρακτήρων, τα ορίσματα καθορίζουν αριθμούς byte. Για δείγμα κώδικα που χρησιμοποιεί τη συνάρτηση MidB, ανατρέξτε στο δεύτερο παράδειγμα στο παράδειγμα θέματος.
Παραδείγματα ερωτημάτων
|
Expression |
Αποτελέσματα |
|
SELECT ProductID, Mid(ProductID;5) AS Παράσταση1 FROM Πωλήσεις Προϊόντων; |
Επιστρέφει το "Κωδ_Προϊόντος" και το τμήμα του Κωδ_Προϊόντος ξεκινώντας από τη θέση του χαρακτήρα 5 και εμφανίζει τα αποτελέσματα στη στήλη Παράστ1. |
|
SELECT ProductID, Mid(ProductID,5,4) AS testMid FROM ProductSales; |
Επιστρέφει το "Κωδ_Προϊόντος" και το τμήμα του Κωδ_Προϊόντος ξεκινώντας από τη θέση του χαρακτήρα 5, που περιέχει 4 χαρακτήρες και εμφανίζει τα αποτελέσματα στον έλεγχο στήληςMid. |
Παραδείγματα VBA
Σημείωση: Παραδείγματα που ακολουθούν δείχνουν τη χρήση αυτής της συνάρτησης σε μια λειτουργική μονάδα Visual Basic for Applications (VBA). Για περισσότερες πληροφορίες σχετικά με την εργασία με τη VBA, επιλέξτε Αναφορά προγραμματιστών στην αναπτυσσόμενη λίστα δίπλα στην Αναζήτηση και πληκτρολογήστε έναν ή περισσότερους όρους στο πλαίσιο αναζήτησης.
Το πρώτο παράδειγμα χρησιμοποιεί τη συνάρτηση Mid για να επιστρέψει έναν καθορισμένο αριθμό χαρακτήρων από μια συμβολοσειρά.
Dim MyString, FirstWord, LastWord, MidWords
MyString = "Mid Function Demo" ' Create text string.
FirstWord = Mid(MyString, 1, 3) ' Returns "Mid".
LastWord = Mid(MyString, 14, 4) ' Returns "Demo".
MidWords = Mid(MyString, 5) ' Returns "Function Demo".
Το δεύτερο παράδειγμα χρησιμοποιεί τη συνάρτηση MidB και μια συνάρτηση που ορίζεται από το χρήστη (MidMbcs) για να επιστρέψει επίσης χαρακτήρες από μια συμβολοσειρά. Η διαφορά εδώ είναι ότι η συμβολοσειρά εισαγωγής είναι ANSI και το μήκος είναι σε byte.
Function MidMbcs(ByVal str as String, start, length)
MidMbcs = StrConv(MidB(StrConv(str, vbFromUnicode), _
start, length), vbUnicode)
End Function
Dim MyString
MyString = "AbCdEfG"
' Where "A", "C", "E", and "G" are DBCS and "b", "d",
' and "f" are SBCS.
MyNewString = Mid(MyString, 3, 4)
' Returns ""CdEf"
MyNewString = MidB(MyString, 3, 4)
' Returns ""bC"
MyNewString = MidMbcs(MyString, 3, 4)
' Returns "bCd"
