Question

Access组合框里的值查询表，并通过窗体里的文本框更新各个表里的内容

我想窗体中选择组合框里“1月”时，下面各文本框里的内容为表“#一月绩效考核统计表”的内容，单击“添加”，在文本框里输入内容后，也保存至“#一月绩效考核统计表”中。
当组合框选“2月”时，查询、添加、保存都是在“#二月绩效考核统计表”中。
以次类推，一共12个月，12个表，都是通过窗体中1~12月这个组合框来控制，请教高人，能做到吗，请给个完整的Access代码。





Answer 1

很简单，但不知你窗体上各个控件的Name，以下代码供参考：
我假设组合框的name是“cmb月”，以下文本框依次为txt1，……txt11.
窗体设计时组合框为未绑定，记录源设为任一月份绩效考核统计表，将各个文本框的控件来源绑定到相应字段。
完成后写入以下代码：
Private Sub cmb月_AfterUpdate()
Me.Form.RecordSource = "#" & Me!cmb月 & "绩效考核统计表"
Me.Requery
Me.Repaint
End Sub
注意，你的组合框里月份是阿拉伯数字，表名中是中文数字，应改为一致。

追问

这个方法没行，选择组合框以后没反应，组合框里的月份是和每个月的表里对应的，选2月，激活“二月绩效考核统计表”，表里也有月份的字段，窗体里其他的文本框也都更新成“二月绩效考核统计表”里对应的字段，组合框选3月，激活“三月绩效考核统计表”，并对应“三月绩效考核统计表”里的字段，添加和保存后，组合框选择是几月，数据就更新至几月的表里

追答

我这方法在Aceess2010上测试通过。你再检查下你的问题出在哪?比如我提示的注意事项，你的表名及字段设计是否匹配等等。如果还不行，将你数据库文件发过来，帮你检查下。

追问

怎么给你发，给我个联系方式或加我