Mid Function, Mid Statement

Ibinabalik ang tinukoy na bahagi ng isang string expression ( Mid function ), o pinapalitan ang bahagi ng isang string expression ng isa pang string ( kalagitnaan ng pahayag ).

Syntax:


Kalagitnaan (Text Bilang String, Magsimula Bilang Mahaba [, Haba Bilang Mahaba]) o Kalagitnaan (Text Bilang String, Magsimula Bilang Mahaba , Haba Bilang Mahaba, Teksto Bilang String)

Ibinalik na halaga:

String (sa pamamagitan lamang ng Function)

Mga Parameter:

Teksto: Anumang string expression na gusto mong baguhin.

Magsimula: Numeric na expression na nagpapahiwatig ng posisyon ng character sa loob ng string kung saan magsisimula ang bahagi ng string na gusto mong palitan o ibalik. Ang minimum na pinapayagang halaga ay 1. Ang maximum na pinapayagang halaga ay 2,147,483,648.

Haba: Numeric na expression na nagbabalik ng bilang ng mga character na gusto mong palitan o ibalik. Ang maximum na pinapayagang halaga ay 2,147,483,648.

Kung ang parameter ng Haba sa kalagitnaan ng pag-andar ay tinanggal, ang lahat ng mga character sa expression ng string mula sa panimulang posisyon hanggang sa dulo ng string ay ibinalik.

Kung ang parameter ng Haba sa kalagitnaan ng pahayag ay mas mababa kaysa sa haba ng teksto na gusto mong palitan, ang teksto ay binabawasan sa tinukoy na haba.

Teksto: Ang string na palitan ang string expression ( kalagitnaan ng pahayag ).

Mga error code:

5 Di-wastong procedure call

Halimbawa:


Sub ExampleUSDate
Dim sInput As String
Dim sUS_date As String
    sInput = InputBox("Mangyaring maglagay ng petsa sa internasyonal na format na '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

Mga function ng string