IBM Lotus Symphony


Funkcja Mid, instrukcja Mid [środowisko wykonawcze]

Powoduje zwrócenie określonego fragmentu łańcucha (Funkcja Mid) lub zastąpienie fragmentu łańcucha innym łańcuchem (Instrukcja Mid).

Składnia

Mid (Tekst As String, Początek As Long [, Długość As Long]) albo Mid (Tekst As String, Początek As Long , Długość As Long, Tekst As String)

Zwracana wartość

Łańcuch (tylko w przypadku funkcji)

Parametry

Tekst: Dowolny łańcuch do zmodyfikowania.

Początek: Wyrażenie liczbowe wskazujące w łańcuchu pozycję znaku, od którego zaczyna się fragment do zmiany lub zwrócenia. Maksymalna dozwolona wartość to 65535.

Długość: Wyrażenie liczbowe określające liczbę znaków do zwrócenia lub zastąpienia. Maksymalna dozwolona wartość to 65535.

Jeśli parametr Długość w funkcji Mid zostanie pominięty, zwrócone zostaną wszystkie znaki od pozycji początkowej do końca łańcucha.

Jeśli parametr Długość w instrukcji Mid wynosi mniej niż długość zastępowanego tekstu, tekst ten zostanie skrócony do określonej długości.

Tekst: Łańcuch, który ma zastąpić modyfikowany łańcuch (instrukcja Mid).

Kody błędów

5 Nieprawidłowe wywołanie procedury

Przykład

Sub Przyklad_Data_US

Dim sWejscie As String

Dim sDataUS As String

sWejscie = InputBox("Proszę podać datę w formacie 'RRRR-MM-DD'")

sDataUS = Mid(sWejscie, 6, 2)

sDataUS = sDataUS & "/"

sDataUS = sDataUS & Right(sWejscie, 2)

sDataUS = sDataUS & "/"

sDataUS = sDataUS & Left(sWejscie, 4)

MsgBox sDataUS

End Sub


Opinia na temat produktu | Dodatkowa dokumentacja | Znaki towarowe