DataGrid, Enviarlo a un dataset con filas seleccionadas

[mdavila]

Esto es un ejemplo ok, pero te va a servir.
Saludos.

Public Sub CargarDataSet()
Dim Row As DataRow
Dim Tble As New DataTable
Dim Ds As New DataSet
Dim Item As DataGridItem

'estos campos son de ejemplo ok
Tble.Columns.Add(New DataColumn("Texto", GetType(String)))
Tble.Columns.Add(New DataColumn("Visitas", GetType(String)))


For Each item In DgTrabajo.Items
Row = Tble.NewRow

If CType(Item.FindControl("TuCheckBox"), CheckBox).Checked Then
'aca fijate que indice tenes que poner, en este caso de ejemplo es 0 y 1
Row.Item("Texto") = Item.Cells(0).Text
Row.Item("Visitas") = Item.Cells(1).Text
End If

Tble.Rows.Add(Row)
Next

'aca tenes el dataset con la tabla dentro del mismo
Ds.Tables.Add(Tble)

End Sub