Example
dim da as new sqldataadapter("select...",conn)
dim ds as new dataset
da.fill(ds,xyz)
dim dr as datarow
dr=ds.tables(0).rows.newrow
with dr
.items(0)=textbox1.text
.items(1)=textbox2.text
.items(2)=textbox3.text
ds.tables(0).addrow(dr)
datagrid1.datasource=ds.tables(0)