Основы программирования на VBA. Регеда В.В - 68 стр.

UptoLike

ВУЗ: 

ПГУ | Пенза

Составители: 

Рубрика: 

В результате на экране появится панель сообщений со строкой Со-
общение$, в строке заголовка будет выведено Заголовок$, а аргумент
ЧислоКод1+ЧислоКод2 определяет внешний вид панели.
С помощью одного числа, являющегося суммой чисел ЧислоКод1 и
ЧислоКод2, можно одновременно установить определенную пиктограм-
му и определенную комбинацию кнопок, размещенных на панели сообще-
ний. Значения чисел ЧислоКод1 и ЧислоКод2 приведены в таблицах 8.1
и 8.2.
Таблица 8.1 Таблица 8.2.
ЧислоКод1 Пиктограмма
16
32
48
64
ЧислоКод2 Набор кнопок
0 ОК
1 ОК, Отмена
2 Стоп, Повтор, Пропустить
3 Да, Нет, Отмена
4 Да, нет
5 Повтор, Отмена
Например число 36 можно рассматривать как сумму чисел 4 (код
комбинации кнопок Да, Нет) и 32 (код пиктограммы «Вопрос»).
Для вывода на панели сообщений с заголовком "MsgBox в режи-
ме оператора" сообщения "Ввод закончен" достаточно добавить
в процедуру Private Sub UserForm_Activate()строку:
MsgBox "Ввод закончен",48,"MsgBox в режиме оператора"
В случае записи аргументов в скобках, функция MsgBox получает
определенное значение, которое может быть присвоено какой-либо пере-
менной. Синтаксис функции при этом следующий:
MsgBox (Сообщение$ [, ЧислоКод1+ЧислоКод2 ] [, Заголовок$ ] )
10) Добавить в форму элемент управления Image (Рисунок), ко-
торый используется для отображения графических файлов в формате BMP,
CUR, GIF, ICO,JPG и WMF в форме.
Включить в процедуру Private Sub UserForm_Activate() строки
bytA = MsgBox("Будете работать с калькулятором?", _
36, "Калькулятор")
If bytA = 6 Then
Х
?
!
i
       В результате на экране появится панель сообщений со строкой Со-
общение$, в строке заголовка будет выведено Заголовок$, а аргумент
ЧислоКод1+ЧислоКод2 определяет внешний вид панели.
       С помощью одного числа, являющегося суммой чисел ЧислоКод1 и
ЧислоКод2, можно одновременно установить определенную пиктограм-
му и определенную комбинацию кнопок, размещенных на панели сообще-
ний. Значения чисел ЧислоКод1 и ЧислоКод2 приведены в таблицах 8.1
и 8.2.
               Таблица 8.1                                 Таблица 8.2.
ЧислоКод1    Пиктограмма       ЧислоКод2          Набор кнопок
     16
                 Х                  0      ОК
     32                             1      ОК, Отмена
                 ?                  2      Стоп, Повтор, Пропустить
     48                             3      Да, Нет, Отмена
                  !
                                    4      Да, нет
     64
                  i                 5      Повтор, Отмена

      Например число 36 можно рассматривать как сумму чисел 4 (код
комбинации кнопок Да, Нет) и 32 (код пиктограммы «Вопрос»).
      Для вывода на панели сообщений с заголовком "MsgBox в режи-
ме оператора" сообщения "Ввод закончен" достаточно добавить
в процедуру Private Sub UserForm_Activate()строку:
MsgBox "Ввод закончен",48,"MsgBox в режиме оператора"
     В случае записи аргументов в скобках, функция MsgBox получает
определенное значение, которое может быть присвоено какой-либо пере-
менной. Синтаксис функции при этом следующий:
     MsgBox (Сообщение$ [, ЧислоКод1+ЧислоКод2 ] [, Заголовок$ ] )
     10) Добавить в форму элемент управления Image (Рисунок), ко-
торый используется для отображения графических файлов в формате BMP,
CUR, GIF, ICO,JPG и WMF в форме.
     Включить в процедуру Private Sub UserForm_Activate() строки
bytA = MsgBox("Будете работать с калькулятором?", _
36, "Калькулятор")
     If bytA = 6 Then

Страницы