Bir dizeden başlayarak belirtilen karakter sayısını içeren bir Değişken (Dize) döndürür.
Sözdizimi
Mid( dize, start [, length ] )
Mid işlevinin söz diziminde şu bağımsız değişkenler bulunur:
Bağımsız değişken |
Açıklama |
dize |
Gerekli. Karakterlerin döndürüldiğidize ifadesi. Dize Null içeriyorsa, Null döndürülür. |
başlangıç |
Gerekli. Uzun. Alınacak parçanın başladığı dizedeki karakter konumu. Başlangıç, dizedeki karakter sayısından büyükse, Mid sıfır uzunluklu bir dize ("") döndürür. |
length |
İsteğe bağlı. Değişken (Uzun). Döndürülecek karakter sayısı. Atlanırsa veya metinde (başlangıçtaki karakter dahil) uzunluk karakterlerinden daha az karakter varsa, başlangıç konumundan dizenin sonuna kadar olan tüm karakterler döndürülür. |
Notlar
Dize içindeki karakter sayısını belirlemek için Len işlevini kullanın.
Not: MidB işlevini, çift baytlık karakter kümesi dillerinde olduğu gibi bir dizede bulunan bayt verileriyle kullanın. Bağımsız değişkenler, karakter sayısını belirtmek yerine bayt sayısını belirtir. MidB kullanan örnek kod için örnek konunun ikinci örneğine bakın.
Sorgu örnekleri
Expression |
Sonuçlar |
SELECT ProductID, Mid(ProductID,5) AS Expr1 FROM ProductSales; |
"ProductID" değerini ve ProductID'nin 5. karakter konumundan başlayarak bölümünü döndürür ve sonuçları İfade1 sütununda görüntüler. |
SELECT ProductID, Mid(ProductID,5,4) AS testMid FROM ProductSales; |
"ProductID" değerini ve ProductID'nin 5. karakter konumundan başlayarak 4 karakter içeren bölümünü döndürür ve sonuçları testMid sütununda görüntüler. |
VBA örnekleri
Not: Aşağıdaki örneklerde, bu işlevin Visual Basic for Applications (VBA) modülünde kullanımı gösterilir. VBA ile çalışma hakkında daha fazla bilgi için, rama'nın yanındaki açılan listede Geliştirici Başvurusu'nu seçin ve arama kutusuna bir veya birden çok terim yazın.
İlk örnek, bir dizeden belirtilen sayıda karakter döndürmek için Mid işlevini kullanır.
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".
İkinci örnekte, dizeden karakterler döndürmek için MidB ve kullanıcı tanımlı bir işlev (MidMbcs) kullanılır. Buradaki fark, giriş dizesinin ANSI olması ve uzunluğun bayt cinsinden olmasıdır.
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"