Funkcija Left

Vrne levi konec niza v dolžini, ki jo navedete.

Skladnja:


Left (Besedilo As String, n As Long)

Vrnjena vrednost:

String

Parametri:

Besedilo: niz, za katerega želite levi konec v navedeni dolžini.

n: numeričen izraz, ki pove, koliko znakov želite. Če n = 0, se vrne niz dolžine nič. Največja dovoljena vrednost je 65535.

Naslednji primer pretvori datum iz oblike LLLL.MM.DD v obliko MM/DD/LLLL.

Kode napak:

5 Neveljaven klic procedure

Primer:


Sub ExampleUSDate
Dim sInput As String
Dim sUS_date As String
    sInput = InputBox("Vnesite, prosimo, datum v mednarodni obliki 'LLLL-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

Podprite nas!