窗体里有datagrid 还有三个按钮分别是B1(填充数据),B2(更新数据),B3(删除此条记录)

数据库的表叫做 xyl1

我用可视化方式创建sqldataadapter(da).之后生成数据集ds

按钮点击事件代码如下

B1:
  da.fill(ds)  '填充

  DataGrid1.DataSource = ds.Tables("xyl1")  '指定对象

  DataGrid1.Refresh()  '刷新

B2:

  da.Update(ds.Tables("xyl1"))

 msgbox("updata ok!")
B3:
        Dim i As Integer
        i = DataGrid1.CurrentRowIndex '获取当前选定值所在的列的索引

        ds.Tables("xyl1").Rows.RemoveAt(i)  '删除当前行



现在问题就出在我点B3能正常把整行记录删除.但点了更新之后再刷新数据库却没被删除.可是我在datagrid直接修改的操作就可以用.就是添加删除修改datagrid的数据都可以....

郁闷.是不是我代码写错了??大侠赐教