5,696,038 members and growing! (16,093 online)
Email Password   helpLost your password?
Languages » VB.NET » General     Beginner License: The Code Project Open License (CPOL)

Populating data from a CSV file to a DataGridView and Retriving data from a DataGridView to CSV

By Dharmit

Populating data from a CSV file to a DataGridView and Retriving data from a DataGridView to CSV
VB, Windows, .NET, Visual Studio, Dev

Posted: 30 Dec 2006
Updated: 30 Dec 2006
Views: 23,261
Bookmarked: 31 times
Announcements
Loading...



Search    
Advanced Search
Sitemap
11 votes for this Article.
Popularity: 2.78 Rating: 2.67 out of 5
3 votes, 27.3%
1
2 votes, 18.2%
2
2 votes, 18.2%
3
2 votes, 18.2%
4
2 votes, 18.2%
5
Note: This is an unedited contribution. If this article is inappropriate, needs attention or copies someone else's work without reference then please Report This Article

 

Introduction

I had problems finding a decent article that showed how to Populate a Datagridview from CSV file and how to store information from DataGridView to a CSV file.

This article is compilation of two sources from the internet.  First one is http://www.thescripts.com/forum/thread554150.html and the second one is http://www.homeandlearn.co.uk/NET/vbNet.html

Description

There is one Form having default name Form1 

There is one DataGridView named DataGridView1

Two buttons named Button1 and Button2

One Textbox named Textbox1

The csv file contains information as follows (between the inverted commas):

"Dharmit,Male,28,First

Lomesha,Female,26,Second

Jaymit,Male,24,Third

Ambrish,Male,54,First

Chanda,Female,50,Second"

Remove inverted commas if you are copying directly from here

 

The sourcecode behind the form is

SourceCode

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim fName As String = ""

OpenFileDialog1.InitialDirectory = "c:\temp\"

OpenFileDialog1.Filter = "CSV files (*.csv)|*.CSV"

OpenFileDialog1.FilterIndex = 2

OpenFileDialog1.RestoreDirectory = True

If (OpenFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK) Then

fName = OpenFileDialog1.FileName

End If

Me.TextBox1.Text = fName

Dim TextLine As String = ""

Dim SplitLine() As String

 

If System.IO.File.Exists(fName) = True Then

Dim objReader As New System.IO.StreamReader(fName)

Do While objReader.Peek() <> -1

TextLine = objReader.ReadLine()

SplitLine = Split(TextLine, ",")

Me.DataGridView1.Rows.Add(SplitLine)

Loop

Else

MsgBox("File Does Not Exist")

End If

End Sub

 

Private Sub SaveGridDataInFile(ByRef fName As String)

Dim I As Integer = 0

Dim j As Integer = 0

Dim cellvalue$

Dim rowLine As String = ""

Try

Dim objWriter As New System.IO.StreamWriter(fName, True)

For j = 0 To (DataGridView1.Rows.Count - 2)

For I = 0 To (DataGridView1.Columns.Count - 1)

If Not TypeOf DataGridView1.CurrentRow.Cells.Item(I).Value Is DBNull Then

cellvalue = DataGridView1.Item(I, j).Value

Else

cellvalue = ""

End If

rowLine = rowLine + cellvalue + ","

Next

objWriter.WriteLine(rowLine)

rowLine = ""

Next

objWriter.Close()

MsgBox("Text written to file")

Catch e As Exception

MessageBox.Show("Error occured while writing to the file." + e.ToString())

Finally

FileClose(1)

End Try

End Sub

 

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

SaveGridDataInFile(Me.TextBox1.Text)

End Sub

End Class

End Source code

If you have any queries e-mail me and I will do my best to help.

cheers

License

This article, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

About the Author

Dharmit


I started with C and then my Professor introduced C++ and I was thrilled. Then when I was working for an Engineering firm, I was introduced to VB6 by one of my friend (and till day I am thankful to him). My love for 3D graphics made me learn 3D studio max but left it and started learning OpenGL. Frustrated with it when I couldn't work with OpenGL in VB6 and VB.net properly, I switched to DirectX. I am learning it for sometimes and will be looking forward to it. Currently I started working on developing Pipe StressAnalysis software.
Occupation: Engineer
Location: Australia Australia

Other popular VB.NET articles:

Article Top
Sign Up to vote for this article
You must Sign In to use this message board.
FAQ FAQ Noise ToleranceSearch Search Messages 
 Layout  Per page   
 Msgs 1 to 10 of 10 (Total in Forum: 10) (Refresh)FirstPrevNext
QuestionDatagridview ValidationmemberMatikule5:48 7 Nov '08  
GeneralReading a CSV into a DataGridViewmemberFilemon Tanchoco20:25 14 Jun '08  
GeneralRe: Reading a CSV into a DataGridViewmemberDharmit2:07 15 Jun '08  
GeneralGreat Code - Exactly what I was looking for.memberbaillie110:27 15 May '08  
GeneralRe: Great Code - Exactly what I was looking for.memberDharmit2:08 15 Jun '08  
QuestionThis Doesn't Workmemberjcviera8:18 19 Jan '07  
AnswerRe: This Doesn't Workmembervishal_chauhan8:43 21 Jun '07  
GeneralGreatmemberMarwa ElBadry22:06 2 Jan '07  
GeneralRe: GreatmemberDharmit1:33 3 Jan '07  
GeneralRe: GreatmemberKwazai4:10 4 Jan '07  

General General    News News    Question Question    Answer Answer    Joke Joke    Rant Rant    Admin Admin   

PermaLink | Privacy | Terms of Use
Last Updated: 30 Dec 2006
Editor:
Copyright 2006 by Dharmit
Everything else Copyright © CodeProject, 1999-2008
FileMail | Advertise on the Code Project