Rambler's Top100
Форум: MS ACCESSVBVBA MS OfficeMS SQL server
Новые сообщения: 0000

Форум: MS ACCESS

Вопросы связанные с MS ACCESS

Обновить визитку
Участники «Online»
Все участники

 
 

Доброго времени суток, Посетитель!

вид форума:
Линейный форум Структурный форум

тема: Функция
 
 автор: Гоблин   (04.02.2012 в 22:18)   личное сообщение
 
 

Привет народ.
Задача такая. Есть дерево с трех веток, которое заполняется при открытии формы. В процессе работы изменяются данные, вводятся новые и отображаются в дереве. Все ОК. НО.
В процессе изменения данных в таблице-справочнике (скажем есть таблица "Фирма" с ключевым полем фирма) данные в подчиненной таблице изменяются по связи по этому полю. А в дереве, (вторая ветка) везде, где встречается эта фирма, как поменять не знаю. Приходится обнулять дерево (Me.TreeView0.Nodes.Clear) и заполнять его заново, как при открытии формы. (переписывать весь код на открытие формы). Потом, если что меняется в коде, то надо вносить изменения не только на открытие, но и на все остальное.
Пытался запихать код заполнения дерева в функцию в модуле.

Public Function treeFunct()
Dim rst As DAO.Recordset

Set rst = CurrentDb.OpenRecordset("SELECT ...

и запускать ее кодом на событие открытия формы
Call treeFunct

ругается на все Me. ... которые есть в функции. Убрав их все, еще больше ругается. При этом если весь код поставить на открытие формы - работает. В общем что не так?

  Ответить  
 
 автор: Гоблин   (04.02.2012 в 22:31)   личное сообщение
 
 

Кажися нашел, но не факт.
вместо Me. ставлю Forms.Форма1. ... Вроде как заработала.

  Ответить  
 
 автор: osmor   (04.02.2012 в 22:37)   личное сообщение
 
 

факт
me действует только в пределах модуля текущей формы.

  Ответить  
 
 автор: Гоблин   (04.02.2012 в 23:16)   личное сообщение
 
 

Точно факт.

  Ответить  
HiProg.com - Технологии программирования
Rambler's Top100 TopList