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

Palmeira

Ficheiros em VB.net 05

4 mensagens neste tópico

Boas, tive a estudar uma parte bastante simples de ficheiros.... fiz um mini programa que escreve e guarda um ficheiro de texto, mostra o conteúdo do mesmo, e conta palavras do ficheiro...

a parte de contar palavras tá mal, dá-me um erro de run time apesar de ter feito bem acho eu :S  :eek:

código da parte q n funciona :

        Dim nfich, linha As String
        Dim contapal, l, i As Integer


        nfich = TextBox1.Text + ".txt"

        FileOpen(1, nfich, OpenMode.Input)

        contapal = 0

        Do Until Not EOF(1)
            linha = LineInput(1) : contapal += 1
            l = Len(linha)
            For i = 1 To l
                If Mid(linha, i, 1) = "" Then
                    contapal += 1
                End If
            Next
        Loop

        textbox3.Text = contapal

Em anexo envio o programa para verem como está organizado se tiverem alguma duvida quanto a isso.

PS : eu já reparei que há muita gente no fórum que utiliza o outro método, (stream blablabla  :)), mas eu aprendi com o método acima mencionado  :-[

Obrigado desde já ,

Palmeira

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Palmeira, experimenta alterar o

For i = 1 To l

para

For i = 0 To l-1

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

o tiago pode estar certo nakilo k diz

porke normalmente uma pessoa começa a contar do 1 mas normalmente começa do 0 e nao 1.

por exemplo uma listbox tem 3 items.... os seus indexs sao: (0,1,2) e nao (1,2,3)

por isso e k muitas vezes as pessoas erram :D

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Palmeira é assim, eu também estou a desenvolver um projecto semelhante ao teu, e também tem essa função, mas eu uso mesmo uma função para contar as palavras, queres que te dê o código? Acho que fico muito mais simples :D

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