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

0x1d

Divisão de Strings

Recommended Posts

0x1d

Boas Pessoal  :D

Tenho uma duvida sobre divisão de Strings.

Tenho de fazer um algoritmo que me fassa a divisão de strings, a partir de um ficheiro de bloco de notas, onde se encontre o nome e email.

Exemplo:

nome;email

nome;email

nome;email

nome;email

nome;email

etc.

E estava a pensar mandar este texto para uma textbox para puder manipular como eu quisesse.

O problema é contar o numero de linhas e a partir dessas linhas fazer a divisão em várias strings. :)

Peço a vossa ajuda mais uma vez.

Aguardo uma resposta


Rui Mendes'Trying to be a Engineer xD'

Share this post


Link to post
Share on other sites
jpaulino

Existem várias formas de ler ficheiros de texto em .NET. Podes ver alguns exemplos aqui:

VB.NET: Utilização de Ficheiros de Texto

Depois podes dividir usando um split, por exemplo:

        Dim str As String = "nome;email"
        Dim result() As String = str.Split(";"c)

        Debug.WriteLine("Nome: " & result(0))
        Debug.WriteLine("Email: " & result(1))

Share this post


Link to post
Share on other sites
0x1d

Já estou a conseguir ir buscar os dados com este cod.

       OpenFileDialog1.FileName = ""
        OpenFileDialog1.ShowDialog()
        Dim total As Integer = 0
        Dim fileName As String
        fileName = OpenFileDialog1.FileName
        Dim lines() As String = IO.File.ReadAllLines(fileName)
        For Each line As String In lines
            Debug.WriteLine(line.ToString)
            total += 1
        Next

Ele escreve este codigo no debug. mas como é que implemento o cod que me enviou? é que depois eu tenho de guardar isso na base de dados  🤔


Rui Mendes'Trying to be a Engineer xD'

Share this post


Link to post
Share on other sites
jpaulino

Então, com o resultado de cada linha (line.ToString) fazes a separação:

       Dim result() As String = line.Split(";"c)

        Debug.WriteLine("Nome: " & result(0))
        Debug.WriteLine("Email: " & result(1))

Atenção: Não testado!

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.