• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

flaviosoares

Como procurar o númeor de ocorrencias de uma palavra numa variável

4 mensagens neste tópico

Bom dia pessoal

Gostaria que alguem me pudesse dar o código que me dê o numero de ocorencias de uma dada palavra/expressão numa variavel.

Por exemplo: tenho a variável "a" como string e e quero saber quantas vezes está escrita a palavra "vb" em "a"

Desde já agradeço

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Olá. Antes de mais, duvido que alguém te dê o código sem mostrares o mínimo de esforço. Em que algoritmos é que já pensaste para resolver o problema?

Se ainda não pensaste em nenhum, podes tentar usar a função instr, que te devolve a primeira ocorrência da palavra. Sugiro-te, dentro de um ciclo, ires pesquisando a ocorrência da palavra, e depois usares o parâmetro "start" para ir procurando mais à frente na string. O ciclo termina quando atingires o fim da string.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Não não pensei em nenhum alogaritmo, era mesmo começar do inicio, eu sou iniciante em programação, não percebo muito mesmo, por isso agradeço que me dessem mesmo o código

Obrigado

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Boas

Antes de mais, não há criados nem magos no forum....

Acho que devias pelo menos fazer um esforço...

    Dim nCaracteres As Integer
    Dim Contar As Integer
    
    For nCaracteres = 1 To Len(Text1.Text)
        If Mid(Text1.Text, nCaracteres, 1) = Procurar.Text Then
            Contar = Contar + 1
        End If
    Next
    MsgBox "Foram encontrados : " & Contar & " Letras"
    

Até+

Programadorvb6

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora