如何在Access 2007中使用vb（我收到错误＃3426）更新子窗体中的记录集

Question

我正在尝试更新子窗体中的控件。 其实我在计算月数。 这是代码:(这不起作用！）

 While (Not Me.Form.Recordset.EOF)
months = Round((Me.End - Me.Start) / 30, 0)
Form_FinanceSubform.[number of months] = 0
Me.[number of months] = months
Me.Form.Recordset.MoveNext
Wend

我得到的错误是：“此操作已被相关对象取消” 在线Me.Form.Recordset.MoveNext

有人可以帮帮我吗？ 谢谢！

Answer 1

将这部分代码放在表单的BeforeUpdate事件中：

months = Round((Me.End - Me.Start) / 30, 0)
Form_FinanceSubform.[number of months] = 0
Me.[number of months] = months

我认为你可以缩短你的代码：

Me.[number of months] = Round((Me.End - Me.Start) / 30, 0)