Problema al refrescar un DataGrid

Jaime
02 de Noviembre del 2005
Hola, tengo un problema,tengo una tabla y al seleccio0nar una fila y darle al botón Entregar se tiene que cambiar el campo Estado_Expedición. Pues bien, el cambio se realiza pero solo se hace visible cuando vuelvo a lanzar la aplicacion:

Private Sub OpenDataset()

Dim Sel As String

ds = New DataSet
daActiveTable = New InTheHand.Data.Adoce.AdoceDataAdapter(m_TableName, m_Parent.Connection)
daActiveTable.Fill(ds)

'populate the grid
DataGrid.DataBindings.Add("DataSource", ds, ds.Tables(0).TableName)


daActiveTable.Dispose()

rsRSExpediciones = New InTheHand.Data.Adoce.Recordset

Sel = "SELECT * FROM Expediciones"
rsRSExpediciones.Open(Sel, cnDataFile, 3)


End Sub

Private Sub cmdEntregar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdEntregar.Click

If rsRSExpediciones.Fields("ESTADO_EXPEDICION").Value = "ENTREGADA" Then
rsRSExpediciones.Fields("ESTADO_EXPEDICION").Value = "JOSE"
Else
rsRSExpediciones.Fields("ESTADO_EXPEDICION").Value = "JOSE"
End If

rsRSExpediciones.Update()
rsRSExpediciones.Requery()

DataGrid.Update()
DataGrid.Refresh()

OpenDataset()

End Sub

Alguien me puede ayudar por favor?