Me.tbl = New DataTable() With Me.tbl .Columns.Add("col1", GetType(String)) .Columns.Add("col2", GetType(String)) .Columns.Add("col3", GetType(Integer)) .Columns.Add("col4", GetType(Integer)) End With With Me.DataGridView1 With DirectCast(.Columns(.Columns.Add(New DataGridViewTextBoxColumn)), DataGridViewTextBoxColumn) .Name = "col1" .DataPropertyName = "col1" End With With DirectCast(.Columns(.Columns.Add(New DataGridViewTextBoxColumn)), DataGridViewTextBoxColumn) .Name = "col4" .DataPropertyName = "col4" End With With DirectCast(.Columns(.Columns.Add(New DataGridViewTextBoxColumn)), DataGridViewTextBoxColumn) .Name = "col3" .DataPropertyName = "col3" End With With DirectCast(.Columns(.Columns.Add(New DataGridViewTextBoxColumn)), DataGridViewTextBoxColumn) .Name = "col2" .DataPropertyName = "col2" End With .DataSource = Me.tbl End With