Mid 函數

附註: 我們想要以您的語言,用最快的速度為您提供最新的說明內容。本頁面是經由自動翻譯而成,因此文中可能有文法錯誤或不準確之處。讓這些內容對您有所幫助是我們的目的。希望您能在本頁底部告訴我們這項資訊是否有幫助。此為英文文章出處,以供參考。

傳回 Variant (String),包含字串的指定字元數。

語法

Mid ( 字串、 啟動 [、 長度]

Mid函數語法具有下列引數:

引數

描述

string

所需。傳回字元的字串運算式 。如果字串包含 null 值,則會傳回Null

開始

所需。長。字元字串開始要採取的組件中的位置。如果開始大於字串中的字元, Mid會傳回的零長度字串 ("")。

length

選用。variant(Long)。若要傳回的字元數。如果省略或少於長度字元,在文字] (包括開始的字元),則會傳回字串結尾的所有字元的開始位置。


註解

若要判斷 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".

第二個範例會使用MidB及使用者定義函數 (MidMbcs),也傳回字串的字元。此處的差別是輸入的字串 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"
增進您的 Office 技巧
探索訓練
優先取得新功能
加入 Office 測試人員

這項資訊有幫助嗎?

感謝您的意見反應!

感謝您的意見反應! 我們將協助您與其中一位 Office 支援專員連絡以深入了解您的意見。

×