IBM Lotus Symphony


Mid-funktio, Mid-lause [käytönaikainen]

Palauttaa määritetyn osan merkkijonolausekkeesta (Mid-funktio) tai korvaa osan merkkijonolausekkeesta toisella merkkijonolla (Mid-lause).

Syntaksi:

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

Palautusarvo:

Merkkijono (vain funktiossa)

Parametrit:

Text: Mikä tahansa merkkijonolauseke, jota haluat muuttaa.

Start: Numeerinen lauseke, joka palauttaa merkkien sijainnin korvattavassa tai palautettavassa merkkijonossa. Suurin sallittu arvo on 65535.

Length: Numeerinen lauseke, joka palauttaa korvattavien tai palautettavien merkkien määrän. Suurin sallittu arvo on 65535.

Jos Mid-funktion Length-parametri puuttuu, merkkijonolausekkeen kaikki merkit alkukohdasta merkkijonon loppuun palautetaan.

Jos Mid-lauseen Length-parametri on pienempi kuin korvattavan tekstin pituus, teksti lyhennetään määritetyn pituiseksi.

Text: Merkkijono, joka korvaa merkkijonolausekkeen (Mid-lause).

Virhekoodit

5 Virheellinen toimintokutsu

Esimerkki:

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


Palautetta tuotteesta | Lisäohjeet | Tavaramerkit