[讨论]如何向窗体中的表格追加数据

王维a780

为了达到在按日期查询时显示的第一行余额是查询后的余额，我修改了查询语句，可修改后窗体中的表格不能添加数据了，怎么解决，有没有办法呢？版主！！！



能否给修改一下

我得到的答复是：

只是把   F() 函數中的.
"id <=" & str(d)   改成

"id <=" & str(d) & "  and  ((T1.日期) Between (IIf(IsNull(Forms!财务明细帐!开始日期),#1/1/2000#,Forms!财务明细帐!开始日期)) And (IIf(IsNull(Forms!财务明细帐!结束日期),#12/31/2099#,Forms!财务明细帐!结束日期)))"

可我怎么改都提示错误，请版主帮我改一下吧！！！

[此贴子已经被作者于2006-5-24 21:03:39编辑过]

王维a780

人气这么旺的地方，怎么没有人回答呢？请版主帮一下吧？

王维a780

有没有可以解决的办法呢？

王维a780

本人十分着急，请求版主能给予修改上传，非常感谢！！！

fannky

你的子窗体里面使用的数据源来自查询，只有只读属性

fannky

Private Sub cmd查询_Click()
Dim a As String
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
a = "(日期 between #" & Me![开始日期] & "# and #" & Me![结束日期] & "#)"   '这些才关键！
Me.财务明细帐子窗体.Form.Filter = a                                        '
Me.财务明细帐子窗体.Form.FilterOn = True                                   '
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
    Me.财务明细帐子窗体.Requery   '这句是关键
End Sub

fannky

修改过的，你看看




当你不希望有误操作修改纪录时，可以加上.acreadonly属性，允许修改纪录时候变为.AcEdit

王维a780

不是这样的，若这样修改后，输入日期查询后的第一行余额不等于收入－支出，你可以输入2006-05-10之2006-05-15试一下，就明白了。

fannky

以下是引用王维a780在2006-5-26 10:06:00的发言：
不是这样的，若这样修改后，输入日期查询后的第一行余额不等于收入－支出，你可以输入2006-05-10之2006-05-15试一下，就明白了。

不明白你的意思了，是不是这样？

王维a780

非常感谢你的回复！！！你修改后的是可以添加数据，查询后的第一行余额也等于收入－支出。可后面的余额不能依次累加了。

[此贴子已经被作者于2006-5-26 15:01:07编辑过]