Aquí tienes un ejemplo básico de como hacerlo sin usar DataSet, sino directamente el datatable
Código vb:
Ver originalDim oData as New DataTable()
Dim oCmpNombre as New DataColumn("Nombre", GetType(String))
Dim oCmpApellido as New DataColumn("Apellido", GetType(String))
oData.Columns.Add(oCmpNombre)
oData.Columns.Add(oCmpApellido)
Dim oDataRow as DataRow
oDataRow = oData.NewRow()
oDataRow("Nombre") = "Valery"
oDataRow("Apellido") = "Net"
oData.Rows.Add(oDataRow)