我用MSFlexGrid控件显示数据库，绑定data，可是当添加和删除后MSFlexGrid中不立即 显示，添加和删除都确确实实的实现了，问怎么解决？是不是延时的问题？用下列程序没有解决：
Public Sub yanshi()
savetime = Timer
While Timer < savetime + 0.5
DoEvents
Wend
End Sub
谢谢！

是，就是这个问题，一直没有解决！当时纯粹不显示，现在显示了可是就是延时！

什么数据量？全部程序如下：
Private Sub Command2_Click()
Dim db As Database  '数据库
Dim rs As Recordset  '记录集，数据表
Dim ss As String
 
s = App.Path + "\用户信息.mdb"
Set db = DBEngine.Workspaces(0).OpenDatabase(s) '打开库


ss = "select * from 用户信息 where 姓名='" & Text1.Text & "'"

Set rs = db.OpenRecordset(ss, dbOpenDynaset)       '打开表，或一个记录集


rs.Delete
Data1.RecordSource = "用户信息"
Data1.Refresh
MSFlexGrid1.Refresh
End Sub
Public Sub yanshi()
savetime = Timer
While Timer < savetime + 0.5 '
DoEvents
Wend
End Sub
谢谢！

没有啊，记录不到十条的！