myconn.Open connstring
rsinfo.Open "select * from 字典信息", myconn, 3, 3, 1
myconn.Execute "delete  from  字典信息 where iname='" & ist_text.List(ist_text.ListIndex) & " '"
rsinfo.Update
rsinfo.Close
myconn.Close就是执行的时候,(每删一条让它的列表也删一条,就是同步的意思,)
大家帮帮我,现在每次重运行窗体才知道删除了一条