Требовать вложенную таблицу в Access, используя VBA - PullRequest
1 голос
/ 20 марта 2012

http://i.stack.imgur.com/NhBss.jpg

У меня есть на f3AgreeService форму Соглашения (родитель) и Сервисные данные (ребенок).Я использовал вложенную таблицу (tService), а не вложенную форму для отображения служебной информации, так как я хочу воспользоваться функцией вложенной таблицы, которая доступна только для таблиц (+ для расширения функции. Под-таблицы могут быть связаны с любым средством / DHBинформация об услуге) (от 1 до 1-многие).

Я хочу иметь возможность использовать кнопку (см. средства / см. DHB) для переключения между двумя различными подсписками для формы tService.Код выглядит следующим образом.

Проблема заключается в том, что вспомогательный лист данных не будет автоматически обновляться, пока вы не закроете и снова не откроете всю форму.Я мог бы точно закрыть и открыть форму каждый раз, когда пользователь нажимает.Но это выглядит некрасиво.Есть ли способ просто запросить или обновить tService, чтобы информация подсписка вступила в силу?

Private Sub cmdDHBs_Click()
Dim MyDB As DAO.Database
Set MyDB = CurrentDb
MyDB.TableDefs("tService").Properties("SubDataSheetName") = "Table.tServ_DHB"
MyDB.Close
Call RefreshTable 'How?
End Sub

Те, которые я пробовал и не работал: Forms! F3AgreeService.Refresh Forms! F3AgreeService.Recalc Forms! F3AgreeService.Query Forms! F3AgreeService.Repaint

1 Ответ

0 голосов
/ 20 марта 2012

Если вы действительно настаиваете на этом, и я не рекомендую это, вы можете перезагрузить исходный объект подчиненной формы после того, как вы изменили подшаблон:

Me.MySubformName.SourceObject = "Table.tService"
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...