Szukaj…
Uwagi
VBA ma wbudowane funkcje do wyodrębniania określonych części ciągów, w tym:
-
Left/Left$ -
Right/Right$ -
Mid/Mid$ -
Trim/Trim$
Aby uniknąć niejawnej konwersji typu onverhead (a tym samym dla lepszej wydajności), należy użyć wersji funkcji z rozszerzeniem $, gdy zmienna łańcuchowa jest przekazywana do funkcji i / lub jeśli wynik funkcji jest przypisany do zmiennej łańcuchowej.
Przekazanie wartości parametru Null do funkcji z rozszerzeniem $ spowoduje błąd w czasie wykonywania („nieprawidłowe użycie wartości null”) - jest to szczególnie istotne w przypadku kodu obejmującego bazę danych.
Użyj Left lub Left $, aby uzyskać 3 najbardziej lewe znaki w ciągu
Const baseString As String = "Foo Bar"
Dim leftText As String
leftText = Left$(baseString, 3)
'leftText = "Foo"
Użyj Right lub Right $, aby uzyskać 3 najbardziej prawe znaki w ciągu
Const baseString As String = "Foo Bar"
Dim rightText As String
rightText = Right$(baseString, 3)
'rightText = "Bar"
Użyj Mid lub Mid $, aby uzyskać określone znaki z ciągu
Const baseString As String = "Foo Bar"
'Get the string starting at character 2 and ending at character 6
Dim midText As String
midText = Mid$(baseString, 2, 5)
'midText = "oo Ba"
Użyj opcji Przytnij, aby uzyskać kopię łańcucha bez żadnych spacji wiodących lub końcowych
'Trim the leading and trailing spaces in a string
Const paddedText As String = " Foo Bar "
Dim trimmedText As String
trimmedText = Trim$(paddedText)
'trimmedText = "Foo Bar"
Modified text is an extract of the original Stack Overflow Documentation
Licencjonowany na podstawie CC BY-SA 3.0
Nie związany z Stack Overflow