Función Mid e instrucción Mid

Devuelve la porción especificada de una expresión de cadena (función Mid) o sustituye la parte de una expresión de cadena por otra cadena (instrucción Mid).

Sintaxis:


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

Valor de retorno:

Cadena (solo por función)

Parámetros:

Texto: cualquier expresión de cadena que se quiera modificar.

Start: Numeric expression that indicates the character position within the string where the string portion that you want to replace or to return begins. The minimum allowed value is 1. The maximum allowed value is 2,147,483,648.

Length: Numeric expression that returns the number of characters that you want to replace or return. The maximum allowed value is 2,147,483,648.

Si se omite el parámetro de longitud de la función Mid, se devuelven todos los caracteres de la expresión de cadena, desde la posición de inicio hasta el final de la cadena.

Si el parámetro de longitud de la instrucción Mid es inferior a la longitud del texto que se desea sustituir, el texto se reduce a la longitud especificada.

Texto: La cadena que sustituirá a la expresión de cadena (instrucción Mid).

Códigos de error:

5 Llamada a procedimiento no válida

Ejemplo:


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