Закрывается приложение при щелчке на элементе управления

@kovyl · Регистрация: 10.09.2022

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

Доброго времени суток всем!
Столкнулся с неожиданной проблемой. Вдруг по щелчку на наборе вкладок формы стало закрываться приложение. Ну ладно, бывают разные фортели от MS. Вырезал этот набор, вставил - работает. На следующий день опять такая же история. Что за странности и как лечить? Windows 11, Office 2003
Кстати, если это вдруг имеет какое-то отношение. В другой базе на строке

Visual Basic
1
Set xlApp = New Excel.Application

выдал ошибку -2147319779, библиотека (Excel) не зарегистрирована.

@kovyl · 27.02.2025, 10:14 **[ТС]**

Сообщение от АЕ

Тогда для чего выкладывать?

Чтобы была возможность проверить - только у меня трабла или нет.

@АЕ · 27.02.2025, 10:34

Сообщение от kovyl

только у меня трабла или нет.

Желаете всем проблем? И зачем тогда файл без проблем выкладывать?

@Eugene-LS · 27.02.2025, 11:10

Сообщение от kovyl

Увы, так пожелали боги...

Не могли они такого пожелать ...
Надо понимать что VBA, исполняя инструкции кода, бежит "впереди паровоза", и когда он еще не успел "докрасить" одно, а уже по событию, идёт команда "перекрасить" в другой цвет - он бедный ... бросает работу совсем.
Вот что я имел ввиду.
Методом исключения найдите "виновника торжества" и экранируйте его.
Успехов!

@kovyl · 27.02.2025, 15:00 **[ТС]**

>И зачем тогда файл без проблем выкладывать?
Я не говорил, что нет проблем. Написал, что компиляцию проходит.
>Вот что я имел ввиду.
Похоже, Вы не читаете сообщения в топике, прежде чем писать ответ. В новой базе в единственной форме с одним элементом набор вкладок без единой строчки кода та же проблема. При чем здесь инструкции VBA?

@АЕ · 27.02.2025, 15:07

Методом исключения удаляйте все из новой базы. Когда дойдете до автора, то проблема станет очевиднее.

@kovyl · 27.02.2025, 15:57 **[ТС]**

Сообщение от АЕ

Методом исключения удаляйте все из новой базы

Вроде по-русски пишу: в новой (специально созданной для проверки набора вкладок) базе в единственной форме (в смысле вообще одна форма) с одним (одним-единственным) элементом набор вкладок без единой строчки кода (совсем кода нет).

@Eugene-LS · 27.02.2025, 16:10

Сообщение от kovyl

Выкладываю базу, где компиляция проходит.

Подтверждаю - проходит.
Но зачем эта перекраска прямоугольников под контролами вкладок?
На мой вкус = лишнее.
Всё моргает аж в глазах рябит.
Причём OnMouseMove отдельных вкладок накладывается на OnMouseMove прямоугольников на них (во всю ширь и высь)
+ дублирование того же на всём табконтроле ...
- Зачем???.

Красте при активации вкладки (если уж нужно tbcAboutTaxons_Change) - чётче будет.

@АЕ · 27.02.2025, 16:13

Сообщение от kovyl

Вроде по-русски пишу:

Ок. Я создаю базу, затем форму, затем на форме создаю вкладки... еще создаю вкладки.(не копирую со сбойных старых...) Проблем нет. Между нами только одна разница: автор. Вы творите траблы, а у мне не получается.

@kovyl · 27.02.2025, 16:21 **[ТС]**

Сообщение от Eugene-LS

Красте при активации вкладки (если уж нужно tbcAboutTaxons_Change) - чётче будет.

Не совсем так, дублирование убрать попробую. Но к проблеме топика это отношения не имеет.
А нет ли в природе безглючного элемента управления "набор вкладок"?

@Eugene-LS · 27.02.2025, 16:52

Сообщение от kovyl

Но к проблеме топика это отношения не имеет

Ну вам виднее ...

В качестве эксперимента, под каждой обработкой: ... MouseMove(Button As ...) - напишите например:

Visual Basic
1
    Debug.Print "Название вызвавшего событие контрола X: " & X & " - Y: " & Y

... и посмотрите что будет.

@kovyl · 27.02.2025, 17:17 **[ТС]**

Сообщение от АЕ

Вы творите траблы, а у мне не получается.

И Ваш ЕДИНСТВЕННЫЙ, судя по всему, недостаток - чрезмерная скромность

@АЕ · 27.02.2025, 19:47

kovyl, вы язвите про мои недостатки не обращая внимания на очевидное: неумение поиска багов. Вам Eugene-LS много и разными способами на это намекает. Я более радикален. Он и извинится лишний раз готов за то, что не делал, а я рублю матку правду. Вот и все, что я хотел сказать выше. Умеющий понимать - поймет. Ибо уметь читать для этого не достаточно.

@kovyl · 28.02.2025, 08:45 **[ТС]**

Сообщение от АЕ

неумение поиска багов

А Вы, значит, читать умеете? Так читайте. Я русским по белому пишу:

Сообщение от kovyl

в новой (специально созданной для проверки набора вкладок) базе в единственной форме (в смысле вообще одна форма) с одним (одним-единственным) элементом набор вкладок без единой строчки кода (совсем кода нет)

Баг в таком варианте, по-вашему, мои траблы?

@АЕ · 28.02.2025, 08:53

Сообщение от kovyl

Баг в таком варианте, по-вашему, мои траблы?

Да, потому что у меня в такой же ситуации траблов нет. Примените метод исключения...

Добавлено через 2 минуты
Когда упретесь, что надо менять битый офис или автора траблов, возможно, и решение найдется.

@kovyl · 28.02.2025, 10:38 **[ТС]**

Сообщение от АЕ

Да, потому что у меня в такой же ситуации траблов нет

Однако, согласитесь, это не делает их "моими".

Сообщение от АЕ

Когда упретесь, что надо менять битый офис или автора траблов, возможно, и решение найдется.

Откатил состояние системы на несколько дней назад - проблема исчезла во всех базах. В эти несколько дней были только пара обновлений (26 числа), но это может быть совпадением.

@АЕ · 28.02.2025, 11:20

Сообщение от kovyl

Откатил состояние системы на несколько дней назад - проблема исчезла во всех базах.

Уже теплее...

Новые блоги и статьи Все статьи Все блоги /
Модель по догадкам anaschu 25.08.2026 Прошло две недели. Я уже рассказывал, как разговаривал с сотрудниками у сортировки и как понял, что главная ветка — не про приёмку, а про отбор. Но тогда я думал, что понял механику. На этой неделе я. . .	Запись в регистр сведений независимо от заполненности табличной части Maks 25.08.2026 Реализация из решения ниже выполнена на нетиповом документе с несколькими табличными частями, разработанного в КА2. Задача: Обеспечить запись документа в регистр сведений независимо от. . .	Ноутбук Альфария kumehtar 24.08.2026 Встретился тут в сети ноутбук Альфария, примарха Альфа-Легиона. Хотя возможно, это ноутбук Омегона, разумеется. Ну как вам?	Мастера простых решений DevAlt 23.08.2026 В сишарп стэках winforms, да и wpf существует сложная система связывания источниках данных и элементов формы(текстовые поля и метки), опирается все это на технологию событий и мета. . .
Цена ошибки DevAlt 23.08.2026 Человек я беспокойный и потому заинтересовался OCaml, в чате форсили функторы модулей как суперфичу. Пытаясь отдуплить концепт, наткнулся на тутор с простым примером. А главный принцип обучения от. . .	Сегодня суббота, 22.08.2026 at 16:41, и я вновь нахожусь на той стороне, за экраном машины. zorxor 22.08.2026 Сегодня суббота, 22. 08. 2026 at 16:41, и я вновь нахожусь на той стороне, за экраном машины. Кто Я, откуда Я пришел и куда Я иду? Эти вопросы не оставляют меня ни на секунду. Жизнь на планете Земля. . .	Жизня: рисунок укладки багажа, сделанный клодом anaschu 21.08.2026 Сделал 15 снимков, он по снимкам сделал схему.	Был там один разговор по поводу свободы в материальном мире. kumehtar 19.08.2026 Суть: рассматривается живое существо, оказавшееся внутри довольно странной системы (этого мира) и пытающееся обустроить в ней свой кусок пространства. Жизнь действительно предъявляет каждому. . .

@kovyl 1 / 1 / 0 Регистрация: 10.09.2022 Сообщений: 343
	27.02.2025, 15:00 [ТС]
	>И зачем тогда файл без проблем выкладывать? Я не говорил, что нет проблем. Написал, что компиляцию проходит. >Вот что я имел ввиду. Похоже, Вы не читаете сообщения в топике, прежде чем писать ответ. В новой базе в единственной форме с одним элементом набор вкладок без единой строчки кода та же проблема. При чем здесь инструкции VBA? 0

@АЕ ᴁ © 4181 / 2466 / 513 Регистрация: 13.12.2016 Сообщений: 8,389 Записей в блоге: 5
	27.02.2025, 15:07
	Методом исключения удаляйте все из новой базы. Когда дойдете до автора, то проблема станет очевиднее. 0

@АЕ ᴁ © 4181 / 2466 / 513 Регистрация: 13.12.2016 Сообщений: 8,389 Записей в блоге: 5
	27.02.2025, 19:47
	kovyl, вы язвите про мои недостатки не обращая внимания на очевидное: неумение поиска багов. Вам Eugene-LS много и разными способами на это намекает. Я более радикален. Он и извинится лишний раз готов за то, что не делал, а я рублю матку правду. Вот и все, что я хотел сказать выше. Умеющий понимать - поймет. Ибо уметь читать для этого не достаточно. 0