Para que te quede mas claro.. lo puedes hacer asi:
Cita: Dim ds As DataSet = 'obtengo mis datos
..
'cuento el numero de columnas generadas para incluirla en la últma
Dim iRow As Integer = ds.Tables(0).Columns.Count
ds.Tables(0).Columns.Add(New DataColumn("Ver historia", GetType(String)))
For Each dr As DataRow In ds.Tables(0).Rows
dr(iRow) = "mi info"
..
Next
DataGrid1.DataSource = ds
DataGrid1.DataBind()
Espero que sea lo que buscas..
Salu2