Devolve uma Variante (Cadeia) que contém um número especificado de variantes de uma cadeia.

Sintaxe

Mid( string, start [, length ] )

A sintaxe da função Média tem estes argumentos:

Argumento

Descrição

cadeia

Obrigatório. expressão de cadeia a partir dos quais são devolvidos carateres. Se a cadeia contiver Nulo, será devolvido Nulo .

começar

Obrigatório. Longo. Posição do caráter na cadeia na qual a parte a tomar começa. Se o início for maior do que o número de carateres na cadeia, Mid devolve uma cadeia de comprimento zero ("").

comprimento

Opcional. Variante (Longo). Número de carateres a devolver. Se omitido ou se existirem menos carateres de comprimento no texto (incluindo o caráter no início), todos os carateres da posição inicial para o fim da cadeia são devolvidos.

Comentários

Para determinar o número de carateres na cadeia, utilize a função Núm. carat.

Nota: Utilize a função MidB com dados de bytes contidos numa cadeia, como em idiomas de conjunto de carateres de byte duplo. Em vez de especificar o número de carateres, os argumentos especificam números de bytes. Para obter o código de exemplo que utiliza MidB, veja o segundo exemplo no tópico de exemplo.

Exemplos de consulta

Expressão

Resultados

SELECT ProductID, Mid(ProductID,5) AS Expr1 FROM ProductSales;

Devolve o "IDDoProduto" e a parte de ProductID a partir da posição de caráter 5 e apresenta os resultados na coluna Expr1.

SELECT ProductID, Mid(ProductID,5,4) AS testMid FROM ProductSales;

Devolve o "IDDoProduto" e a parte de ProductID a partir da posição de caráter 5, que contém 4 carateres e apresenta os resultados no testMid da coluna.

Exemplos de VBA

Nota: Os exemplos seguintes demonstram a utilização desta função no módulo VBA (Visual Basic for Applications). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência para Programadores na lista pendente junto a Procurar e introduza um ou mais termos na caixa de pesquisa.

O primeiro exemplo utiliza a função Média para devolver um número especificado de carateres de uma cadeia.

Dim MyString, FirstWord, LastWord, MidWordsMyString = "Mid Function Demo"    ' Create text string.FirstWord = Mid(MyString, 1, 3)    ' Returns "Mid".LastWord = Mid(MyString, 14, 4)    ' Returns "Demo".MidWords = Mid(MyString, 5)    ' Returns "Function Demo".

O segundo exemplo utiliza MidB e uma função definida pelo utilizador (MidMbcs) para também devolver carateres da cadeia. A diferença aqui é que a cadeia de entrada é ANSI e o comprimento está em bytes.

Function MidMbcs(ByVal str as String, start, length)    MidMbcs = StrConv(MidB(StrConv(str, vbFromUnicode), _              start, length), vbUnicode)End FunctionDim MyStringMyString = "AbCdEfG"' Where "A", "C", "E", and "G" are DBCS and "b", "d", ' and "f" are SBCS.MyNewString = Mid(MyString, 3, 4)' Returns ""CdEf"MyNewString = MidB(MyString, 3, 4)' Returns ""bC"MyNewString = MidMbcs(MyString, 3, 4)' Returns "bCd"

As funções de cadeia e como utilizá-las

Precisa de mais ajuda?

Quer mais opções?

Explore os benefícios da subscrição, navegue em cursos de formação, saiba como proteger o seu dispositivo e muito mais.

As comunidades ajudam-no a colocar e a responder perguntas, a dar feedback e a ouvir especialistas com conhecimentos abrangentes.