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

flaviosoares

Contar palavras num ficheiro txt

7 mensagens neste tópico

Boa noite a todos, eu sou novo aqui no forum, e já preciso da vossa ajuda.

Eu estou a programar em VB 2008 e sim via mensagem que só se aceitam questões de VB06 e versões anteriores, mas o código pode ser em vb06 eu adapto sem problemas

passemos ao problema

Eu estou a tentar criar um programa que conta a ocorrência de palavras num ficheiro .txt

Tenho uma caixa de texto um botão e outra caixa de texto

quero que ao carregar no botão o programa procure quantas vezes estão escritas a palavra que está na 1ª caixa e texto e coloque o numero de palavras encontradas na segunda

Desde já muito obrigado :)

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Isso com regular expressions é um instante.

Pesquisa na net sobre elas e cm as usar em vb.net.

Edit: (Não reparei q era VB6.)

O vb6 tem regular expressions?

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

poderias ser um pouco mais explicito, tipo dar-me já os códigos ou partes

é que eu já estive a procurar mas como nem sei o que isso é, não me safo lá muito bem

Obrigado

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Boas,

' procura por todas as palavras em uma string

Dim re As New RegExp

Dim m As Match

Dim t As String

texto = "Introdução a expressões regulares no VB "

re.Pattern = "\w+"

re.Global = True

For Each m In re.Execute(texto)

  MsgBox m.Value

Next

Abaixo temos uma pequena(muito pequena) lista de tipos padrão usadas com as expressões regulares:

x* Zero ou mais x's

x+ Um ou mais x's

x? Um ou zero x's

[A-Z] Qualquer caractere maiúsculo de A-Z

. Qualquer caractere excepto newline

\w Qualquer caractere alfanumérico

\d Qualquer digito (o mesmo que [0-9])

^a tudo que começa com a

s$ tudo que termina com s

Retirado de: ht*p://www.macoratti.net/vb_regex.htm

Penso que é isto que queiras :)

Cumps

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

muito obrigado mesmo, eu usei um muito parecido mas esse ajudou-me bue porque o que tinha encontrado era de .NET e assim consegui arranjar o código certo para o VB 2008

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

o outro código de que te tinha falado dá muitos erros, e ao inserir o teu directamente dá varios erros

na ultima declaração de variável creio que te enganas-te, não será:

Dim texto As String

E depois há duas coisas que não percebo

        Dim re As New RegExp

        Dim m As Match

no VB2008 as declarações "New RegExp"  e "Match" ficam sublinhadas como erros, se me puderem ajudar, agradeço imenso

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