Usando Access

Contar espaços de uma frase

Nota importante: para ter acesso aos vídeos e arquivos exemplos deste site, adquira um dos planos apresentados abaixo. Você pode comprar em até 2x no Cartão de Crédito. 

Veja como comprar e saiba mais sobre o material oferecido,  clicando aqui.

Usuário Ronaldo:

Boa Tarde.

Existe alguma função através da qual eu possa contar os espaços de uma determinada frase?

Ex. "Eu amo o MSAccess"

A função me daria como resultado 3.

Grato.

Suporte:

Ronaldo, copie a função proposta para um módulo global:

Faça o login aqui para ter acesso ao código.

Agora é só usar a função:

fncContaEspaços("Eu amo o MSAccess") :::> 3

Usuário Ronaldo:

Não entendi Avelino!

Veja como quero usar.

Dim strSerie as String
If espaços de strSerie = 1 then ´Se os espaços de strSerie for igual a 1 então...
    strSerie = strSerie '...strSerie é igual a quantidade total de caracteres
else 'Se não...

   '...strSerie é igual a quantidade total de caracteres menos 1.
   strSerie = Left(strSerie,Len(strSerie)-1) 
End if

Quero contar os espaços de strSerie.  Onde e como uso a função?

Grato.

Suporte:

Ronaldo, veja como é simples:

Faça o login aqui para ter acesso ao código.

Usuário Ronaldo:

Excelente, Avelino!

Obrigado.

| Home | Vídeos | Tutoriais | Dicas | Ribbons | Suporte | Downloads | Contato | Artigo |