|
0 / 0 / 0
Регистрация: 02.11.2008
Сообщений: 3
|
||||||
Private Sub Vihod() Exit End Sub не срабатывает02.11.2008, 16:41. Показов 1131. Ответов 4
Метки нет (Все метки)
Заранее спасиб
0
|
||||||
(| 02.11.2008, 16:41 | |
|
Ответы с готовыми решениями:
4
Private Sub mnuFileExit_Click() Form1.Exit End Sub не работает Private Sub Workbook_Open() MsgBox 'HelloWorld!' End Sub Не срабатывает Ошибка user.exe в коде: Private Sub Text1_Change() If Text1.Text = 'del' Then Unload Me End If End Sub |
|
eddy
|
|
| 02.11.2008, 17:39 | |
|
Ты уверен, что процедура Vihod() отрабатывает?
|
|
|
0 / 0 / 0
Регистрация: 02.11.2008
Сообщений: 3
|
|
| 02.11.2008, 17:41 [ТС] | |
|
Да , когда дебагером отладку ведешь , то он выполняет эту процедуру . Я вот думаю может не корректно сеанс завершаю с БД
0
|
|
|
eddy
|
|
| 02.11.2008, 17:51 | |
|
Теперь все понятно. Поставь End. Хотя это не самый грамотный способ (Желательно закрыь базу и все объекты объявить как Nothing, например в Form1_Unload).
Exit - прерывает выполнение процедуры или циклов. Поэтому форму ты никогда не закроешь. То есть ты входил в проедедуру и сразу выскакивал. |
|
|
0 / 0 / 0
Регистрация: 02.11.2008
Сообщений: 3
|
|
| 02.11.2008, 17:54 [ТС] | |
|
Спасиб , завтра попробую, скажу что получилось
0
|
|
| 02.11.2008, 17:54 | |
|
Помогаю со студенческими работами здесь
5
Private Sub CommandButton3_Click() TextBox1.Text = TextBox1.Text + "A" + Str(ActiveCell.Row) End Sub Из private сделать private static With myChart With .Axes(xlCategory) .CategoryType = xlTimeScale .BaseUnit = xlseconds End With End With Продаю инфраструктуру VPN-сервиса (back-end + frond-end) Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |
|
Новые блоги и статьи
|
|||
|
Хочу заставить корпорации вкладываться в здоровье сотрудников: делаю мат модель здравосохранения
anaschu 22.03.2026
e7EYtONaj8Y
Z4Tv2zpXVVo
https:/ / github. com/ shumilovas/ med2. git
|
1С: Программный отбор элементов справочника по группе
Maks 22.03.2026
Установка программного отбора элементов справочника "Номенклатура" из модуля формы документа.
В качестве фильтра для отбора справочника служит группа номенклатуры.
Отбор по наименованию группы. . .
|
Как я обхитрил таблицу Word
Alexander-7 21.03.2026
Когда мигает курсор у внешнего края таблицы, и нам надо перейти на новую строку, а при нажатии Enter создается новый ряд таблицы с ячейками, то мы вместо нервных нажатий Энтеров мы пишем любые буквы. . .
|
Krabik - рыболовный бот для WoW 3.3.5a
AmbA 21.03.2026
без регистрации и смс.
Это не торговля, приложение не содержит рекламы. Выполняет свою непосредственную задачу - автоматизацию рыбалки в WoW - и ничего более. Однако если админы будут против -. . .
|
|
1С: Программный отбор элементов справочника по значению перечисления
Maks 21.03.2026
Установка программного отбора элементов справочника "Сотрудники" из модуля формы документа.
В качестве фильтра для отбора служит значение перечислений.
/ / Событие "НачалоВыбора" реквизита на форме. . .
|
Переходник USB-CAN-GPIO
Eddy_Em 20.03.2026
Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .
|
Оттенки серого
Argus19 18.03.2026
Оттенки серого
Нашёл в интернете 3 прекрасных модуля:
Модуль класса открытия диалога открытия/ сохранения файла на Win32 API;
Модуль класса быстрого перекодирования цветного изображения в оттенки. . .
|
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++
8Observer8 17.03.2026
Содержание блога
Финальные проекты на Си и на C++:
finish-rectangles-sdl3-c. zip
finish-rectangles-sdl3-cpp. zip
|