Função mid

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

Sintaxe

Mid ( cadeia; início [; comprimento ] )

A sintaxe da função mid tem os seguintes argumentos:

Argumento

Descrição

cadeia

Obrigatório. expressão de cadeia a partir dos quais os carateres são devolvidos. Se cadeia contiver nulo, é devolvido NULL .

começar

Obrigatório. Longas. Posição de carateres na cadeia na qual a parte a ser executada começa. Se 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 for omitido ou se existirem menos de carateres de comprimento no texto (incluindo o caráter em início), serão devolvidos todos os carateres a partir da posição inicial até ao fim da cadeia.


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 byte contidos numa cadeia, como em idiomas de conjuntos 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 o MidB, consulte o segundo exemplo no tópico de exemplo.

Exemplos de consulta

Expressão

Resultados

Selecione CódigoDoProduto, mid (CódigoDoProduto; 5) como expr1 do ProductSales;

Devolve o "CódigoDoProduto" e a parte do ProductID a partir da posição do caráter 5 e apresenta os resultados na coluna expr1.

Selecione CódigoDoProduto, mid (CódigoDoProduto; 5; 4) como testMid a partir de ProductSales;

Devolve o "CódigoDoProduto" e a parte do ProductID a partir da posição de carateres 5, que contém 4 carateres e apresenta os resultados na coluna testMid.

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 mid para devolver um número específico de carateres de uma cadeia.

Dim MyString, FirstWord, LastWord, MidWords
MyString = "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 o 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 Function
Dim MyString
MyString = "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"

Nota:  Esta página foi traduzida automaticamente e pode conter erros gramaticais ou imprecisões. O nosso objetivo é que estes conteúdos lhe sejam úteis. Pode indicar-nos se estas informações foram úteis? Eis o artigo em inglês para sua referência.​

Aumente os seus conhecimentos do Office
Explore as formações
Seja o primeiro a obter novas funcionalidades
Adira ao Office Insider

As informações foram úteis?

Obrigado pelos seus comentários!

Obrigado pelo seu feedback! Parece que poderá ser benéfico reencaminhá-lo para um dos nossos agentes de suporte do Office.

×