Visual Basic - Recargar FexGrid

Hola amigos. Tengo un problema para recargar el flexgrid, es decir, cuando agrego informacion no me aparece en el flexgrid o cuando borro la informacion tampoco se actualiza solo cuando reinicio la aplicacion.

¿Como le hago para que se actualicve en el momento?

Este es el codigo y trabajo con DAO GRACIAS:-)

Dim db As Database
Dim RsMoral As Recordset
Dim RsFisico As Recordset
Dim CargaFlexMoral As Recordset

Private Sub SalvaM_Click()

If SalvaM.Caption = "&Alta" Then
Call Habilita
Call Limpia
ComboMoral(0).Text = ""
SalvaM.Caption = "&Guardar"
Else
BarraEstado.Panels(1).Text = "Guradado"
RsMoral.AddNew
RsMoral!RazonSocial = IngresoMoral(0).Text
...
RsMoral.Update

FlexMoral.Refresh
Call InHabilita
SalvaM.Caption = "&Alta"
End If
End Sub