dim ds as new dataset
dim da as sqldataadapter = new sqldataadapter
dim str as string
str="select..."
ds=new dataset
da=new sqldataadapter(str,con)
da.fill(ds,"Table")
'ถ้าจะเรียกใส่ดาต้ากริดก็
'ในกรณีที่แอดคอลัมน์ให้กับดาต้ากริดวิวไปแล้ว ก็เพิ่ม ออโต้เจนเนอเรทคอลัมน์ไปนะครับ = false
with datagridview
.datasource = ds.table("Table")
end with