הפונקציה Mid

חשוב: מאמר זה תורגם בתרגום מכונה, ראה כתב ויתור. תוכל למצוא את הגרסה באנגלית של המאמר כאן לעיונך.

החזרת משתנה (‏מחרוזת) המכיל מספר תווים שצוין במחרוזת.

תחביר

Mid ( מחרוזת, התחלה [אורך ] )

התחביר של הפונקציה Mid מכיל את הארגומנטים הבאים:

ארגומנט

תיאור

string

נדרש. ביטוי מחרוזת ממנו מוחזרים תווים. אם המחרוזת מכיל Null, Null המוחזר הוא.

התחלה

נדרש. זמן רב. מיקום התו ב- מחרוזת שבו מתחיל החלק שיש להחזיר. אם start גדול ממספר התווים במחרוזת, Mid מחזירה מחרוזת באורך אפס ("").

length

אופציונלי. משתנה (ארוך). מספר התווים שיש להחזיר. אם לא צוין, או אם יש פחות מ- length תווים בטקסט (כולל התו ב- start), מוחזרים כל התווים ממיקום start לסוף המחרוזת.


הערות

כדי לקבוע את מספר התווים ב- string, השתמש בפונקציה Len.

הערה: השתמש בפונקציה MidB עם נתוני בייט הכלולים במחרוזת, כמו שפות ערכת תווים של שני בתים. במקום לציין את מספר התווים, הארגומנטים מציינים מספרי בתים. לקבלת דוגמה של קוד המשתמש ב- MidB, עיין בדוגמה השנייה בנושא הדוגמה.

דוגמה

הערה: הדוגמאות הבאות מדגימות את השימוש של פונקציה זו במודול 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".

הדוגמה השניה משתמשת פונקציה המוגדרת על-ידי המשתמש (MidMbcs) ו- MidB גם כן כדי להחזיר תווים ממחרוזת. ההבדל כאן הוא מחרוזת הקלט היא ANSI האורך הוא בבתים.

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"

הערה: כתב ויתור בנוגע לתרגום מכונה: מאמר זה תורגם על-ידי מערכת מחשב, ללא התערבות אדם. Microsoft מציעה את תרגומי המכונה כדי לסייע למשתמשים שאינם דוברי אנגלית ליהנות מתוכן בנושא מוצרים, שירותים וטכנולוגיות של Microsoft. מכיוון שהמאמר תורגם על-ידי מכונה, הוא עלול להכיל שגיאות באוצר המילים, בתחביר או בדקדוק.

הרחב את הכישורים שלך
סייר בהדרכה
קבל תכונות חדשות לפני כולם
הצטרף למשתתפי Office Insider

האם מידע זה היה שימושי?

תודה על המשוב!

תודה על המשוב! נראה שכדאי לקשר אותך לאחד מנציגי התמיכה של Office.

×