我用DataGrid控件的编辑，删除功能，
操作后不能马上刷新？
都已经绑定了，找了许多资料不知何故，
请高手指点！！

先操作在绑定

绑定的代码：
Sub GridBind()
Dim MenuId As Integer = Request.QueryString(MenuId)
Dim cn As New OleDbConnection(dmd.dbpath)
Dim SqlStr As String
If MenuId <= 0 Then
SqlStr = "Select * from Product"
Else
SqlStr = "Select * from Product where MenuCategoryId=" & MenuId
End If
Dim Da As New OleDbDataAdapter(SqlStr, cn)
Dim Ds As New DataSet
Da.Fill(Ds, "Product")
ProductGrid.DataKeyField = "ProductId"
ProductGrid.DataSource = Ds.Tables("Product")
ProductGrid.DataBind()
End Sub
'删除
Sub DeleteProduct(ByVal Source As Object, ByVal E As DataGridCommandEventArgs)
Dim cn As New OleDbConnection(dmd.dbpath)
Dim ProductID As String = ProductGrid.DataKeys(E.Item.ItemIndex)
Dim SqlStr As String = "Delete from Product where ProductId=" & ProductID
Dim Command As New OleDbCommand(SqlStr, cn)
cn.Open()
Command.ExecuteNonQuery()
ProductGrid.EditItemIndex = -1
GridBind()
End Sub

没报错吗？

没有报错，