Как обновить набор записей в подчиненной форме с помощью VB (я получаю ошибку # 3426) в Access 2007 - PullRequest
Новая
       21

Как обновить набор записей в подчиненной форме с помощью VB (я получаю ошибку # 3426) в Access 2007

0 голосов
/ 05 июля 2010

Я пытаюсь обновить элемент управления в подчиненной форме. На самом деле я рассчитываю количество месяцев. вот код: (который не работает!) 

 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

Может кто-нибудь помочь мне здесь? спасибо!

1 Ответ

1 голос
/ 20 января 2011

Просто поместите эту часть своего кода в событие 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)
...