Visual Basic.NET - crear data set

HOLA =) ESPERO PUEDAN AYUDARME .. GRACIAS
NECESITO CREAR DATASET(TABLA TEMPORAL)PARA LUEGO MOSTRARLO EN UN REPORTE.

ME EXPLICO EL "DATASET" LO QUIERO CREAR DE UN CONSULTA DE UNA TABLA N ACCESS

DESEO K LOS REGISTROS D EUNA CONSULTA DE UN SOLO CAMPO, SEAN LEIDOS Y COLOCADOS COMO NOMBRE DE COLUMNAS EN OTRA TABLA......

HE INTENTADO HACER ESO ASI PERO NO SI ESTARA BIEN O NO:
ADEMAS TENGO UN ERROR(EN LA FLECHA) "EL OBJETO NO HA SIDO INSTANCIADO"

Dim com1 As New OleDbCommand()
com1.CommandText = "select distinct fecha from TrabajadoresC where month(Fecha)=" & Val(Me.Label2.Text) & " order by fecha "
com1.Connection = cn
Dim da As New OleDbDataAdapter()
da.SelectCommand = com1
Dim ds As New DataSet
da.Fill(ds, "Trabajadores")

Dim report As New DataTable
Dim i As Integer
'Dim xxx As String
For i = 0 To ds.Tables("Trabajadores").Rows.Count - 1
========> ds1.Tables("report").Columns.Add(ds.Tables("Trabajadores").Rows(i).Item(0))
da.Fill(ds1, "report")
Dim dv As New DataView()
dv.Table = ds1.Tables("report")
cn.Close()
Me.DataGridView1.DataSource = dv

Next i

GARCIAS D EANTEMANO =)