Умерено: Изисква основни макро кодиране и съвместна работа умения.


В тази статия се отнася само за Microsoft Access база данни (.mdb или .accdb).

Резюме

Тази статия ви показва как да използвате метода Application.SetOption забраняват предупредителни съобщения в приложение на Access.

Допълнителна информация

Microsoft предоставя примери само за илюстративни цели без изрични или подразбиращи се. Това включва, но не е ограничено до, подразбиращи се гаранции за продаваемост или годност за определена цел. Тази статия се предполага, че сте запознати с демонстрирания език за програмиране и инструментите, които се използват за създаване и процедури за отстраняване на грешки. Инженерите на поддръжката на Microsoft могат да помогнат с обяснение на функциите на конкретна процедура, но няма да могат да модифицират тези примери с цел осигуряване на допълнителна функционалност или създаване на процедури за удовлетворение на конкретните ви изисквания. Заявки за действия и други процеси, Добавяне, изтриване или променят данни обикновено представяне на потребителя с предупреждение, че данните е да се променят. В средата приложение обаче, често е желателно да забраните предупрежденията, защото проверки и предпазни мерки обикновено са извън контрола на потребителя.

Можете да постигнете това с помощта на SetWarnings метод на обекта DoCmd , но може да предпочетете да забраните предупрежденията за цялото приложение. За да направите това, можете да използвате метода SetOption на обекта на приложението . Обаче ако направите това, трябва също така да предупреждения отново, тъй като приложението се затваря.


За целта просто, една форма приложението, изпълнете следните стъпки:

  1. Стартирайте Access и след това да създадете празна база данни с име TestRun.

  2. Импортиране на таблицата на клиентите от примерни данни Northwind.mdb.

  3. Създаване на нов формуляр в изглед за проектиране и добавете необвързан разгъващ се раздел за подробности.

  4. Задайте следните свойства за разгъващ се списък:
    Name: cboCountry
    Row Source: SELECT DISTINCT Customers.Country FROM Customers ORDER BY Customers.Country;

  5. Добавяне на бутон към секцията за подробни данни на формуляра и го наречете cmdDelete.

  6. Задайте свойството OnClick на бутона за командата следното събитие:

    DoCmd.OpenQuery "qryDeleteCustomers"
  7. Затворете редактора на Visual Basic.

  8. Запишете формуляра като DeleteCustomers и след това го затворете.

  9. Създаване на нова заявка в изглед за проектиране и добавете таблицата клиенти.

  10. Access 2002 или Access 2003 щракнете върху Изтрий заявката в менюто заявката .

    В Access 2007 щракнете върху Изтрий в групата Тип заявкаот лентата с инструменти .

  11. Плъзнете звездичка (*) от списъка в първата колона на мрежата за проектиране на заявки и след това плъзнете полето страна втората колона.

  12. Критерии за ред на страната колона въведете следното:
    Forms![DeleteCustomers]![cboCountry]

  13. Запишете заявката като qryDeleteCustomers и след това го затворете.

  14. Отворете DeleteCustomers формуляр в изглед за формуляри.

  15. Изберете държава от комбинираното поле, щракнете върху бутона за команди и забележете предупреждение, което се появява. Щракнете върху не в диалоговия прозорец предупреждение.

  16. Отваряне на формуляр в изглед за проектиране и лентата с инструменти щракнете върху бутона код .

  17. В прозореца Код въведете или поставете следните процедури:

    Private Sub Form_Load()

    Application.SetOption "Confirm Action Queries", 0
    Application.SetOption "Confirm Document Deletions", 0
    Application.SetOption "Confirm Record Changes", 0

    End Sub

    Private Sub Form_Unload(Cancel As Integer)

    Application.SetOption "Confirm Action Queries", 1
    Application.SetOption "Confirm Document Deletions", 1
    Application.SetOption "Confirm Record Changes", 1

    End Sub
  18. Затворете редактора на Visual Basic и след това запишете и затворите формуляра.

  19. Отворете DeleteCustomers форма, изберете страната и след това щракнете върху бутона за команди.


    Имайте предвид, че ще се появи диалогът не предупреждение.

В този пример на приложението потвърди опции са забранени при DeleteCustomers форма се зареждат и активирана отново, когато тя се изключва. В по-сложни приложения може да извърши същите действия в табло или стартиране форма.

Нуждаете се от още помощ?

Разширете уменията си
Преглед на обучението
Получавайте първи новите функции
Присъединете се към Microsoft приобщени

Беше ли полезна тази информация?

Доколко сте доволни от качеството на езика?
Какво е повлияло на вашия потребителски опит?

Благодарим ви за обратната връзка!

×