dim conn as new sqlconnection("Server=purana;Database=Northwind;Integrated Security=SSPI")
conn.open()       '//如果没有错误的话,连接成功
'//将数据显示在dataGrid控件上.
dim ada as new sqlDataAdapter("Select * From Orders",conn)
dim ds as new dataSet()
ada.fill(ds,"Orders")
dataGrid1.SetdataBinding(ds,"Orders")    '//将数据集绑定到dataGrid里.
conn.close()       '//关闭连接,以释放连接资源.

 我也用的这个方法 不过我不需要显示 所以就没有绑定到datagrid上
 只是在数据集上做了些插入 修改的工作 然后用update返回给数据库
 可是数据库没反应 应该和绑定没什么关系吧