IBM Lotus Symphony
|
Vracia počet ľavých krajných znakov, ktoré špecifikujete v reťazcovom výraze.
Left (Text As String, n As Long)
Reťazec
Text: ľubovoľný reťazcový výraz, z ktorého chcete vrátiť ľavé krajné znaky.
n: Numerický výraz, ktorý zadáva počet znakov, ktoré sa majú vrátiť. Ak n = 0, vráti sa reťazec s nulovou dĺžkou. Maximálna povolená hodnota je 65535.
Nasledujúci príklad konvertuje dátum vo formáte YYYY.MM.DD do formátu MM/DD/YYYY.
Sub Príklad_USDate
Dim sInput ako typ String
Dim sUS ako typ String
sInput = InputBox("Prosím zadajte dátum v medzinárodnom formáte 'YYYY-MM-DD'")
sUS_date = Mid(sInput, 6, 2)
sUS_date = sUS_date & "/"
sUS_date = sUS_date & Right(sInput, 2)
sUS_date = sUS_date & "/"
sUS_date = sUS_date & Left(sInput, 4)
MsgBox sUS_date
End Sub