Вопрос : Другой метод снабжать ссылками формирует в проекте доступа?

Немного лет тому назад я сделал проект быстро доступа 2003 то задействованное несколько управления treeview посредника изготовленный на заказ были использованы на разнообразие формах в течении проекта. Я пришел от окружающей среды .NET поэтому я начал приложить некоторое тип-основанная методология к проекту доступа. зона

One я экспериментировал с снабжала ссылками формы и управление через изготовленный на заказ классовую структуру. Я собрал серию общественных функций в модуле типа возвратил справку к специфически форме или управлению. Когда мне было нужно снабдить ссылками специфически управление, котор я instantiated пример типа, вызвал соотвествующую функцию, и использовал возвращенную справку для того чтобы достигнуть управления UI. показалось, что работало

This без всех проблем но я интересовал если классовые структуры относительно неработоспособны в доступе?

я люблю гибкость и организация использования типов как фабрики справки для форм и управления, в отличие от больше обычный нотации «челки», но если он замедляет проект вниз на продолжительности времени после этого, то он отрицает преимущества flexibility.

Has, котор любое еще использовало этот вид формы и управления снабжая ссылками в доступе? Я дебатирую using это на новом проекте доступа включает довольно немного формы и controls. class=

Ответ : Другой метод снабжать ссылками формирует в проекте доступа?

<>>

 Опять, ваш не идти мочь сделать то здесь в типичном способе OOP.  Вы не можете иметь предмет низкопробного типа, тогда subclass оно и дорабатывать его.  Access/VBA не поддерживает никакое из того.

Вы можете создать тип textbox и случаи раковины с им и ввести новые свойства и методы, но они будут этим же для каждого управления в app если вы не иметь отдельно типы.

<>>

  По мере того как я сказал, он кажется я нуждается зрении по мере того как я все еще реально не понимаю он ваш идти поже. Это:

Приватное Sub Form_Load ()

GetForm (FORM_MAIN). Титр = «шнур титра испытания»

Тусклое TempControl как управление
Установите TempControl = GetControl (FORM_MAIN, FORM_MAIN_TEXBOX_1)

С TempControl
   .SetFocus
   . Текст = «испытание»
Конец с

Установите TempControl = ничего

Закончите подводную лодку

Как раз не делает чувство к мне в доступе.  Он был бы как раз как просто и clearer для того чтобы сделать:

Приватное Sub Form_Load ()

Me.Caption = «шнур титра испытания»

Me.Text0.SetFocus
Me.Text0.Text = «испытание»

Подводная лодка конца

и без всех экстренных накладных расходов.  Так я не вижу никакое преимущество к использованию GetForm (), GetControl () etc как раз для того чтобы получить справку к что-то.  Возможно пропавше то нормальн, проявитель назовет управление что-нибудь подобное:

txtBirthDate
cbxHIPPAOnFile
lstSelectPatient

для называть управления и других предмет (using приставка), которым будет легке для работы с и реально помогает с работами по дома изменения и обслуживания.

И далеко как режимы вы имеете, никакую причину закрепить петлеть через все формы или управление как то.  Как раз сделайте:

Общественная функция GetForm (sFormName ByVal) как форма

   На ошибке переход GetForm_Error

   Установите GetForm = формы (strFormName)

GetForm_Exit:
  Выходите функция

GetForm_Error:
  Установите GetForm = ничего
  Возобновьте GetForm_Exit

Закончите функцию

  По мере того как вы можете увидеть, Access/VBA уже имеет формы собрание и вы можете использовать синтаксис:

 Формы (strFormName)

 получить справку к использованию перемеююого шнура содержа имя.  И оно имеет собрания для как раз около каждого другого предмета также.

 О единственном месте где необходимо требовал для того чтобы сделать ваш пытаться сделать когда вам нужно иметь множественные примеры формы.  Тому типично нужно быть обращанным с что-то как GetForm (), которое поддерживало бы собрание раскрынных форм по мере того как Access/VBA не отрегулирует то на ем должно иметь.  Но снаружи того, ничего еще, котор я могу думать где он worth накладные расходы.

JimD.