Hi Terry
Because of your message I was thinking what was the kull again.
We had the same conclussion.
Cor
Private Sub Form1_Load(ByVal sender As Object, _
ByVal e As System.EventArgs) Handles MyBase.Load
Dim dt As New DataTable("bla")
dt.Columns.Add("Oxes")
Dim mystring() As String = {"Highfield Road", _
"Abbey(Close)", "Bower(Way)", "Bower(Way)", "Roadway To Hell"}
For i As Integer = 0 To mystring.Length - 1
Dim dr As DataRow = dt.NewRow
dr(0) = mystring(i)
dt.Rows.Add(dr)
Next
Dim dr2 As DataRow = dt.NewRow
dr2(0) = "Ox"
dt.Rows.InsertAt(dr2, 2)
Dim dtnew As DataTable = dt.Copy
dt = dtnew.Copy
DataGrid1.DataSource = dt
End Sub