IBM Lotus Symphony


Funkcija Mid, stavek Mid [izvajalno okolje]

Vrne podani del nizovnega izraza (funkcija Mid) ali zamenja del nizovnega izraza z drugim nizom (Stavek Mid).

Skladnja:

Mid (Text As String, Start As Long [, Length As Long]) or Mid (Text As String, Start As Long , Length As Long, Text As String)

Vrnjena vrednost:

Niz (samo za funkcijo)

Parametri:

Text: Katerikoli nizovni izraz, ki ga želite spremeniti.

Start: Številski izraz, ki nakazuje položaj znaka znotraj niza, kjer se začne del niza, ki ga želite zamenjati ali vrniti. Največja dovoljena vrednost je 65535.

Length: Številski izraz, ki vrne število znakov, ki jih želite zamenjati ali vrniti. Največja dovoljena vrednost je 65535.

Če je parameter Length za funkcijo Mid izpuščen, so vrnjeni vsi znaki v nizovnem izrazu od začetnega položaja do konca niza.

Če je parameter Length v stavku Mid krajši kot besedilo, ki ga želite zamenjati, se besedilo skrči na podano dolžino.

Text: Niz, ki naj zamenja nizovni izraz (stavek Mid).

Kode napak

5 Neveljavni klic procedure

Primer:

Sub ExampleUSDate

Dim sInput As String

Dim sUS_date As String

sInput = InputBox("Please input a date in the international format '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


Povratne informacije o izdelku | Dodatna dokumentacija | Blagovne znamke