Вопрос : Нужно добавить имена к комбинированной рамке

Я имею комбинированную рамку (Combo30)/источник = OwnerID
после того как я основан на вопросе:   ВЫБЕРИТЕ OwnerTbl.OID, OwnerTbl.Owner ОТ ЗАКАЗА OwnerTbl МИМО [предприниматель]; потребность

I (OwnerTbl) раскрыть настолько новые имена можно добавить когда потребитель пытается input имя не находится в списке.  Теперь она как раз говорит им что они должны использовать имя в list. class=

Ответ : Нужно добавить имена к комбинированной рамке

Здесь несколько примеры также:

Пример 1 - Вводящ новый деталь сразу в таблицу взгляда вверх за местами….
Приватное Sub cboCONTACT_ID_NotInList (NewData как шнур, реакция как интежер)
Тусклое myVar
Тусклое ctl как управление
Тусклое lresponse как длиной
Установите ctl = Me.cboCONTACT_ID
Если MsgBox, то (NewData & «будет новым деталем.  Вы желаете добавить его к комбинированной рамке? », vbYesNo, «добавляет деталь») = vbYes после этого

   'добавьте новый рекорд
    Вставка CurrentDb.Execute «в значения tbl_contacts ([contact_NAME]) ("» & NewData & «"); «
    Реакция = acDataErrAdded
Еще
    myVar = Me.cboCONTACT_ID
    Реакция = acDataErrContinue
    ctl. Расстегните
    Закончитесь если

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

Пример 2 - «Form2» будет просто формой соединенной к таблице списка
Приватная подводная лодка Combo1_NotInList (NewData как шнур, реакция как интежер)

    Если MsgBox, то (NewData & «будет новым деталем.  Вы желаете добавить его к комбинированной рамке? ") = vbYesNo после этого
        DoCmd.OpenForm «Form2», acFormAdd, acDialog, NewData
        Реакция = acDataErrAdded
    Еще
        Реакция = acDataErrContinue
        Me.Combo1.Undo
    Закончитесь если
   
Закончите подводную лодку

mx