' Assume dt is DataTable reference Dim RowToAdd As DataRow Dim InStr As String Dim InData() As String Dim InFile As StreamReader InFile = File.OpenText("c:\example\example.txt") While InFile.Peek > -1 InStr = InFile.ReadLine InData = Split(InStr, "|") RowToAdd = dt.NewRow() RowToAdd(0) = CType(InData(0),Integer) RowToAdd(1) = Indata(1) ' etc. Or, use LoadDataRow. dt.Rows.Add(RowToAdd) End WhileSee ADO.NET and You, May 22, 2002, for a similar (but different) example (http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnadvnet/html/vbnet05282002.asp).