Преобразовать макрос в процедуру обработки событий

@VinniPuh · Регистрация: 27.03.2013

Студворк — интернет-сервис помощи студентам

Здравствуйте!
Попробовал сегодня преобразовать макрос в процедуру обработки событий (несколько лет назад получилось).
Делал так:
Открыл БД - "Копия График работы-7.6"
Открыл форму - "#Сотрудники" в режиме конструктора
Cвойства формы -> Вкладка - События -> Ставлю курсор на строку - Открытие - (макрос) ОБЩИЕ.Сдвиг (сдвигает форму при открытии в верхний угол)
На панели инструментов
Сервис -> Макрос -> Преобразовать макрос формы
Открываю форму - ХРЯСТЬ, а там одни ошибки и Access ругается.
Опять вместо процедуры обработки событий ставлю макрос - ОБЩИЕ.Сдвиг - ФИГ, тоже ошибки.
Подскажите в чем суть, где и что не так прописалось. Может в связи с уже подступившим склерозом не то что то делаю. Несколько лет назад помнится так преобразовать у меня получалось.
Так как только начинаю пробовать с VB, не силен в этом, а если мне нужна обработка события, то скромно пишу макрос.
Смотреть примеры во вложении - "Преобразование макроса"
1. БД - "График работы-7.6" - макрос работает
2. БД - "Копия График работы-7.6" - процедура ругается
Заранее благодарен.

@Андрэич · 21.04.2013, 17:02

По поводу макросов. Макрос в Аксесс - это некий интерфейс, по замыслу разработчиков, способный упростить собственно программирование. Естественно, ограниченный. Естественно, малоработоспособный. Естественно - что это посредник, без которого можно обойтись, и все так и делают

@VinniPuh · 21.04.2013, 17:10 **[ТС]**

Сообщение от Андрэич

По поводу макросов. ... способный упростить собственно программирование. Естественно, ограниченный. Естественно, малоработоспособный. Естественно - что это посредник, ...

Короче как я понял Ваш ответ - Пока не научился писать в VB, нечего надеяться, что это сделает за тебя программа, которая - НЕСОВЕРШЕННА???

@Андрэич · 21.04.2013, 17:18

Сообщение от kmv-puh

Короче как я понял Ваш ответ - Пока не научился писать в VB, нечего надеяться, что это сделает за тебя программа, которая - НЕСОВЕРШЕННА???

Хммм, как бы Вам сказать...

Вы учили иностранные языки через грамматику?
Есть некий набор общих правил, как выразить то-то и то-то. В информатике (как и в языкознании) это называется алгоритмом: например, если ... то ... иначе... Вот это надо понять. Конечный язык для объяснения не так важен

@VinniPuh · 21.04.2013, 17:33 **[ТС]**

Спасибо. Буду пока МАКРОСИТЬ

. Буржуинский язык у меня как то не очень. Для себя уяснил, - Пока буду пользоваться примерами из др. БД и изучать по ним, что и как.

@Андрэич · 21.04.2013, 17:36

Вы не поняли: МАКРОСИТЬ - это моветон в программировании...

@minob · 21.04.2013, 17:45

Сообщение от kmv-puh

Смотреть примеры во вложении - "Преобразование макроса"
1. БД - "График работы-7.6" - макрос работает
2. БД - "Копия График работы-7.6" - процедура ругается

Посмотрел БД "Копия График работы-7.6". У вас в модуле формы две процедуры с одинаковым именем кн_Выход_Click.

@VinniPuh · 21.04.2013, 17:45 **[ТС]**

Сообщение от Андрэич

... моветон в программировании...

Извиняюсь за свою тупость, а что такое - моветон, впервые такое слово слышу.
Под - МАКРОСИТЬ - подразумевал, что в основном события буду обрабатывать с помощью макросов, но и по мере понимания процедур (найденные примеры) в дальнейшем применять у себя.
Понимаю, что это пережиток, но мне так понятнее и доступнее, переучиваюсь с трудом (Для себя лично, а не для чего то - Хобби такое)

@Андрэич · 21.04.2013, 17:53

Это перевод с французского: "дурной тон", то есть, поведение человека

@VinniPuh · 21.04.2013, 18:10 **[ТС]**

minob - спасибо, щас посмотрю, что да как.

Добавлено через 11 минут
minob -И что с ними НАДО сделать. Пробовал удалять и то и другое, - Access Ругается.
не силен в нюансах.

@minob · 21.04.2013, 18:48

Сообщение от kmv-puh

И что с ними НАДО сделать. Пробовал удалять и то и другое, - Access Ругается.
не силен в нюансах.

Раньше в свойстве OnClick кнопки кн_Выход была прописана ссылка на макрос Открыть.Организации, поэтому хотя и существовала процедура кн_Выход_Click (откуда она взялась известно только вам) по нажатию на кнопку срабатывал макрос.
После преобразования макроса в код появилась вторая процедура кн_Выход_Click, которая привязана к кнопке кн_Выход. Но две процедуры с одним именем не уживаются.
Выход: удалить одну из процедур. Какую решать вам. Я бы удалил непривязанную (она в модуле расположена выше) к кнопке.

@VinniPuh · 21.04.2013, 20:29 **[ТС]**

Спасибо, пошел искать

Добавлено через 1 час 33 минуты
minob - Спасибо, но так и не понял конкретно, что необходимо сдеоать, как ни старался, наверное VB, надеюсь только пока, не для меня. Но отчаиваться не собираюсь, буду УГЛУБЛЯТЬ познания.
Еще раз спасибо за внимание.

@minob · 21.04.2013, 20:49

Сообщение от kmv-puh

так и не понял конкретно, что необходимо сдеоать

В модуле формы #Сотрудники, которая в БД "Копия График работы-7.6", удалить процедуру, т.е. вот этот текст

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub кн_Выход_Click()
On Error GoTo Err_кн_Выход_Click
 
 
    DoCmd.Quit
 
Exit_кн_Выход_Click:
    Exit Sub
 
Err_кн_Выход_Click:
    MsgBox Err.Description
    Resume Exit_кн_Выход_Click
    
End Sub

@VinniPuh · 21.04.2013, 21:08 **[ТС]**

minob - Огромное Вам спасибо, УРА - ПОЛУЧИЛОСЬ,

.
Вы как всегда БЕСПОДОБНЫ.
Не мытьем, так катаньем, даже такого неуча как я смогли направить в нужном направлении.
Низкий Вам поклон.

@alvk · 22.04.2013, 03:44

Сообщение от kmv-puh

Буду пока МАКРОСИТЬ

Макросятина Ктулху.

Новые блоги и статьи Все статьи Все блоги /
Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .	SDL3 для Web (WebAssembly): Сборка библиотек SDL3 и Box2D из исходников с помощью CMake и Emscripten 8Observer8 27.02.2026 Недавно вышла версия SDL 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual. . .	SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .	Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .	И ясному Солнцу zbw 12.02.2026 И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.	«Знание-Сила» zbw 12.02.2026 «Знание-Сила» «Время-Деньги» «Деньги -Пуля»

@Андрэич 2842 / 774 / 41 Регистрация: 20.05.2012 Сообщений: 2,055
	21.04.2013, 17:02
	По поводу макросов. Макрос в Аксесс - это некий интерфейс, по замыслу разработчиков, способный упростить собственно программирование. Естественно, ограниченный. Естественно, малоработоспособный. Естественно - что это посредник, без которого можно обойтись, и все так и делают 0

@VinniPuh 9131 / 6137 / 593 Регистрация: 27.03.2013 Сообщений: 19,993
	21.04.2013, 17:33 [ТС]
	Спасибо. Буду пока МАКРОСИТЬ . Буржуинский язык у меня как то не очень. Для себя уяснил, - Пока буду пользоваться примерами из др. БД и изучать по ним, что и как. 0

@Андрэич 2842 / 774 / 41 Регистрация: 20.05.2012 Сообщений: 2,055
	21.04.2013, 17:36
	Вы не поняли: МАКРОСИТЬ - это моветон в программировании... 0

@Андрэич 2842 / 774 / 41 Регистрация: 20.05.2012 Сообщений: 2,055
	21.04.2013, 17:53
	Это перевод с французского: "дурной тон", то есть, поведение человека 0

@VinniPuh 9131 / 6137 / 593 Регистрация: 27.03.2013 Сообщений: 19,993
	21.04.2013, 18:10 [ТС]
	minob - спасибо, щас посмотрю, что да как. Добавлено через 11 минут minob -И что с ними НАДО сделать. Пробовал удалять и то и другое, - Access Ругается. не силен в нюансах. 0

@VinniPuh 9131 / 6137 / 593 Регистрация: 27.03.2013 Сообщений: 19,993
	21.04.2013, 20:29 [ТС]
	Спасибо, пошел искать Добавлено через 1 час 33 минуты minob - Спасибо, но так и не понял конкретно, что необходимо сдеоать, как ни старался, наверное VB, надеюсь только пока, не для меня. Но отчаиваться не собираюсь, буду УГЛУБЛЯТЬ познания. Еще раз спасибо за внимание. 0

@VinniPuh 9131 / 6137 / 593 Регистрация: 27.03.2013 Сообщений: 19,993
	21.04.2013, 21:08 [ТС]
	minob - Огромное Вам спасибо, УРА - ПОЛУЧИЛОСЬ, . Вы как всегда БЕСПОДОБНЫ. Не мытьем, так катаньем, даже такого неуча как я смогли направить в нужном направлении. Низкий Вам поклон. 0