Mid Function

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

Syntax:


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

Ibinalik na halaga:

String (sa pamamagitan lamang ng Function)

Mga Parameter:

string: Anumang string expression na gusto mong i-extract (Mid function). Anumang pangalan ng variable ng text na gusto mong baguhin (Mid subroutine).

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 Mid subroutine ay mas mababa sa haba ng text na gusto mong palitan, babawasan ang text sa tinukoy na haba.

Text: Ang string na papalitan ang string expression (Mid subroutine).

Mga error code:

5 Di-wastong procedure call

Halimbawa:


Sub ExampleMid_Function_and_Statement
  text = "This is the original Text"
func1:
  MsgBox Mid(text, 13, 8)   ' returns the word "original"
  MsgBox text               ' text is not modified
stmt1:
  Mid(text, 13, 8, "new")
  MsgBox text               ' returns "This is the new Text"
func2:
  MsgBox Mid(start:=10, string:="The quick brown fox ..") ' shows " brown fox .."
stmt2:
  Mid text, 9, 12, "a new Phrase"
  MsgBox text               ' returns "This is a new Phrase"
End Sub

Mangyaring suportahan kami!