Mid függvény, Mid utasítás

Visszaadja egy string (karakterlánc) kifejezés megadott részét (Mid függvény), vagy lecseréli a string (karakterlánc) kifejezés egy részét egy másik string (karakterláncra) kifejezésre (Mid utasítás).

Szintaxis:


Mid (Szöveg As String, Kezdés As Long [, Hossz As Long]) vagy Mid (Szöveg As String, Kezdés As Long , Hossz As Long, Szöveg As String)

Visszatérési érték:

String (karakterlánc) (csak a függvény esetén)

Paraméterek:

Szöveg: Bármilyen string (karakterlánc) kifejezés, amelyet módosítani akar.

Kezdés: Numerikus kifejezés, amely a karakterláncban a másolni vagy visszakapni kívánt karakterláncrész kezdetét jelző karakter pozícióját adja meg. A maximális érték 65535.

Hossz: Numerikus kifejezés, amely a másolni vagy visszakapni kívánt karakterek számát adja vissza. A maximális érték 65535.

Ha a Hossz paraméter nincs megadva a Mid függvényben, akkor a függvény a string (karakterlánc) kifejezés összes karakterét - a kiindulási pozíciótól a végéig - visszaadja.

Ha a Mid utasítás Hossz paramétere kisebb, mint a lecserélni kívánt szöveg hossza, akkor a függvény lecsökkenti a szöveget a megadott hosszra.

Szöveg: A string (karakterlánc) kifejezés lecserélésére szolgáló karakterlánc (Mid utasítás).

Hibakódok:

5 Érvénytelen eljáráshívás

Példa:


Sub ExampleUSDate
Dim sInput As String
Dim sUS_date As String
    sInput = InputBox("Adjon meg egy dátumot „ÉÉÉÉ-HH-NN” nemzetközi formátumban)
    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

Please support us!