Add datarow programetically to xsd dataset

See more:

VB

RDLC

XSD

dataset

I am creating a rdlc report to print barcode where i post the barcode and item information from the database to new created bcodeds.xsd and DataTable1 is a datatable, i am writing the fallowing code but i am getting error

Dim newCustomersRow As bcodeds.DataTable1Row
    newCustomersRow = bcodeds.DataTable1.NewDataTable1Row()
    newCustomersRow.bcode = "112252"
    newCustomersRow.iname = "toy train"
    newCustomersRow.icomp = "abs"
    newCustomersRow.irate = 99
    bcodeds.DataTable1.Rows.Add(newCustomersRow)

but i am getting fallowing error while writing the code reference to non shared memberrequire an object reference .