如何刷新窗体的后台数据啊？

sxgaobo

一窗体的数据源为“合同临时表”，想通过选择合同编号 组合框 里的合同编号改变窗体显示的数据，方法：合同编号改变后，先删除“合同临时表”中的数据，然后将选定合同编号的合同从合同表中复制到“合同临时表”，现在的问题是更新数据后如何将窗体刷新

tmtony

窗体.form.requery

或

窗体.form.refresh

sxgaobo

tmtony 发表于 2016-2-15 11:05
窗体.form.requery

或

领导过年好！！！
谢谢你的关注，
我用了 修改合同.Form.Refresh 提示错误：
运行时错误‘424’
要求错误

zyp

如果产生事件的窗体和要显示数据的窗体是同一个窗体的话，直接用
me.Requery
就可以了

tmtony

修改合同.form.requery
修改合同  必须是一个窗体 或子窗体控件

sxgaobo

tmtony 发表于 2016-2-15 15:55
修改合同.form.requery
修改合同  必须是一个窗体 或子窗体控件

不好意思！我开始说的不明确，应该是:
”修改合同“窗体的数据源为“合同临时表”，想通过选择”修改合同“窗体中合同编号 组合框 里的合同编号改变窗体显示的数据，方法：合同编号改变后，先删除“合同临时表”中的数据，然后将选定合同编号的合同从合同表中复制到“合同临时表”，现在的问题是更新数据后如何将窗体刷新
希望 合同编号 更新后，刷新窗体中的数据

ly

sxgaobo 发表于 2016-2-15 21:10
不好意思！我开始说的不明确，应该是:
”修改合同“窗体的数据源为“合同临时表”，想通过选择”修改合 ...

假定，组合框名称为cboFilter，窗体数据源为合同表，合同编号为数值类型。
无需建立临时表，直接用sql设置条件更改数据源。

1. Private Sub cboFilter_Click()
   
2. Dim strSQL As String
   
3. strSQL = "SELECT * FROM 合同表 WHERE 合同编号 =" & cboFilter
   
4. Me.RecordSource = strSQL
   
5. End Sub
   

复制代码