How to read data from file to show in ListVie?

Hi Phanny,

Try this...

Here is a code in vb.net.

First replace double space to single space in the text file.


Imports System.IO
Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim Id As String
        Dim Name As String
        Dim Gender As String
        Dim Address As String

        Try

            Dim sr As StreamReader
            Dim fs As FileStream
            fs = New FileStream(("C:\temp\a.txt"), FileMode.OpenOrCreate)
            sr = New StreamReader(fs)
            Dim itm As Object
            itm = sr.ReadLine
            While Not itm = Nothing
                Dim split As String() = itm.Split(New [Char]() {" "})
                Id = split(0)
                Name = split(1)
                Gender = split(2)
                Address = split(3)
                ListView1.Items.Add(Id)
                ListView1.Items(ListView1.Items.Count - 1).SubItems.Add(Name)
                ListView1.Items(ListView1.Items.Count - 1).SubItems.Add(Gender)
                ListView1.Items(ListView1.Items.Count - 1).SubItems.Add(Address)
                itm = sr.ReadLine
            End While

            sr.Close()
            fs.Close()
            ListView1.Columns.Add("Id", 70, HorizontalAlignment.Center)
            ListView1.Columns.Add("Name", 70, HorizontalAlignment.Center)
            ListView1.Columns.Add("Gender", 70, HorizontalAlignment.Center)
            ListView1.Columns.Add("Address", 70, HorizontalAlignment.Center)
            ListView1.View = View.Details
            ListView1.GridLines = True
            ListView1.BackColor = Color.Aqua
            ListView1.ForeColor = Color.Blue
        Catch ex As System.Exception
            System.Windows.Forms.MessageBox.Show(ex.Message, "Load Tool Data Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
        End Try
    End Sub
End Class




Thanks