Vsebina

# Ukaz Mid, funkcija Mid

Vrne zahtevani del izraza vrste niza-String (funkcija Mid), ali pa zamenja del niza z drugim nizom (ukaz Mid).

### Skladnja:

    Mid (Besedilo As String, Začetek As Long [, Dolžina As Long]) or Mid (Besedilo As String, Začetek As Long , Dolžina As Long, Besedilo2 As String)

### Vrnjena vrednost:

String (samo za funkcijo)

### Parametri:

Besedilo: poljuben niz, ki ga želite spremeniti.

Začetek: numeričen izraz, pri katerem znaku se začenja niz, katerega želite vrniti ali zamenjati. Najmanjša dovoljena vrednost je 1. Največja dovoljena vrednost je 2.147.483.648.

Dolžina: numeričen izraz, ki pove, koliko znakov želite zamenjati ali vrniti. Največja dovoljena vrednost je 2.147.483.648.

Če parameter Dolzina v funkciji Mid izpustite, bo funkcija vrnila vse znake od točke Zacetek do konca niza.

Če je parameter Dolzina v ukazu Mid krajši od dolžine besedila, ki ga želite zamenjati, se besedilo skrajša na navedeno dolžino.

Besedilo: Niz, ki naj zamenja vsebino (ukaz Mid).

### 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

Podobne teme

Funkcije z nizi