1. Набираем команду codeby webinar. Набираем команду для организации и проведения вебинаров. Подробнее ...

    Скрыть объявление
  2. Требуются разработчики и тестеры для проекта codebyOS. Требования для участия в проекте: Знание принципов работы ОС на базе Linux; Знание Bash; Крайне желательное знание CPP, Python, Lua; Навыки системного администрирования. Подробнее ...

    Скрыть объявление
  3. Получи 30.000 рублей. Для получения денег необходимо принять участие в конкурсе авторов codeby. С условиями и призами можно ознакомиться на этой странице ...

    Внимание! Регистрация авторов на конкурс закрыта.

    Скрыть объявление

Сообщение закрыть программу “Да” “Нет”

Тема в разделе "Visual Basic", создана пользователем segail, 21 июн 2009.

  1. segail

    segail Гость

    Репутация:
    0
    При клике по кнопке CommandButton2 выходит сообщение закрыть программу ”Да” ”Нет”
    При клике Да необходимо выполнить действии Unload Me а при клике Нет закрыть сообщение.
    У меня закрывает программу при клике ”Да” и ”Нет” Дополните код.

    Private Sub CommandButton2_Click()
    MsgBox "Данные сохранены. Закрыть программу?", 32 + 4, "Закрытие программы"
    Unload Me
    End Sub
     
  2. alex77755

    alex77755 Well-Known Member

    Репутация:
    0
    Регистрация:
    15 фев 2009
    Сообщения:
    128
    Симпатии:
    0
    Можно так. Только не разобрался с подсветкой кода??
    <!--shcode--><pre><code class='VBA'>Private Sub Комманда1_Click()

    Dim Вопрос

    Вопрос = MsgBox("Данные сохранены. Закрыть программу?", 32 + 4, "Закрытие программы")

    Select Case Вопрос
    Case 6
    Unload Me
    End Select

    End Sub[/CODE]
     
Загрузка...

Поделиться этой страницей