Try this
Dim dt As New DataTable
dt.Columns.Add("col1")
dt.Columns.Add("col2")
dt.Columns.Add("col3")
dt.Columns.Add("col4")
dt.Columns.Add("total")
dt.Rows.Add("")
dt.Rows.Add("")
dt.Rows.Add("")
dt.Rows.Add("")
dt.Columns("total").Expression = "[col2]+[col3]"
Me.DataGridView1.DataSource = dt