高校问答死神人气投票:VB达人请进
来源：百度文库 编辑：高校问答 时间：2024/05/10 15:31:36
ExeSQL (sql) '执行完语句后sql插入语句后
MsgBox "数据录入成功！", vbExclamation
'''''''''''''''''''''''''''''''''''''''''刷新datagrid
DataEnvironment1.rsMyrecordset.Requery
Set dataGrid.DataSource = DataEnvironment1
很神奇的一件事，就是每次启动工程后，第一次执行以上语句时，
datagrid 并不刷新，之后执行就没有任何问题了，每次都能刷新，
关了窗体再开来执行也没问题。弄了一天都没办法，请知道原因的赐教
（注意，我是用的DataEnvironment来连接数据库的）
xzp 我试过了，还是没用
真的很奇怪，environment有时可以刷新，有时要多执行几遍才能刷新
MsgBox "数据录入成功！", vbExclamation
'''''''''''''''''''''''''''''''''''''''''刷新datagrid
DataEnvironment1.rsMyrecordset.Requery
Set dataGrid.DataSource = DataEnvironment1
很神奇的一件事，就是每次启动工程后，第一次执行以上语句时，
datagrid 并不刷新，之后执行就没有任何问题了，每次都能刷新，
关了窗体再开来执行也没问题。弄了一天都没办法，请知道原因的赐教
（注意，我是用的DataEnvironment来连接数据库的）
xzp 我试过了，还是没用
真的很奇怪，environment有时可以刷新，有时要多执行几遍才能刷新
ExeSQL (sql) '执行完语句后sql插入语句后
MsgBox "数据录入成功！", vbExclamation
'''''''''''''''''''''''''''''''''''''''''刷新datagrid
dataGrid.DataMember=""
dataGrid.Refresh
DataEnvironment1.rsMyrecordset.Requery
dataGrid.DataMember="rsMyrecordset"
dataGrid.Refresh
这样应该就可以了～
试试看
为什么要使用DataEnvironment来链接数据库和datagrid 呢？你可以使用ADO动态实现啊，一旦数据库中的数据发生改变，马上清除掉dataGrid中的数据再显示新的数据，这样不更快些吗？
能否将你的代码发给我，我帮你看看。