Mid-funktion, Mid-udtryk

Returnerer den angivne portion af et strengudtryk (Mid funktion), eller erstatter portionen af et strengudtryk med en anden streng (Mid sætning).

Syntaks:


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

Returværdi:

String (kun ved funktion)

Parametre:

Text: Et strengudtryk, som du vil ændre.

Start: Numerisk udtryk, der angiver den tegnposition i strengen, hvor den mængde strenge, du vil udskifte eller returnere, begynder. The minimum allowed value is 1. Den maksimalt tilladte værdi er 2.147.483.648.

Length: Numerisk udtryk, der returnerer det antal tegn, du vil erstatte eller returnere. Den maksimalt tilladte værdi er 2.147.483.648.

Hvis længdeparameteren i funktionen Mid funktion er udeladt, vil alle tegn i strengudtrykket fra begyndelsen til slutningen af strengen returneres.

Hvis længdeparameteren i funktionen Mid sætning er mindre end længden af den tekst, som du vil erstatte, vil teksten reduceres til den angivne længde.

Text: Den streng der erstatter strengudtrykket (Mid sætning).

Fejlkoder:

5 Ugyldigt Procedurekald

Eksempel:


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