Файл: Сборник задач по VBA.pdf

Скачать файл
Заказать решение

ВУЗ: Не указан

Категория: Не указан

Дисциплина: Не указана

Добавлен: 16.07.2025

Просмотров: 492

Скачиваний: 0

ВНИМАНИЕ! Если данный файл нарушает Ваши авторские права, то обязательно сообщите нам.

ìcos x, если x £ 0,

ï

Добавьте в форму кнопку Отмена для

функции y = ícos x

+ ex , если x > 0.

ï

î 5

завершения работы с пользовательской формой.

Исходные данные:

Результат:

x = 0

1,0000

4. Создайте пользовательскую

форму на языке VBA, вычисляющую

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

Исходные данные:

Результат:

3, 5, 4

12,0000

5. Создайте пользовательскую форму на языке VBA, выводящую значения

ìtg x, если x £ 0,

ï

Добавьте в форму кнопку Отмена для

функции y = íx2

- 5, если x > 0.

ï

4

î

завершения работы с пользовательской формой.

Исходные данные:

Результат:

x = 0

0,0

6.Создайте пользовательскую форму на языке VBA, изменяющую фон цвета на синий. Изменения фона реализовать с помощью события Click. Добавьте

вформу кнопку Отмена для завершения работы с пользовательской формой.

7.Создайте пользовательскую форму на языке VBA, выводящую значения

ì x

+ sin x, если x £ -1,

ïe

Добавьте в форму кнопку Отмена для

функции y = í

ïx2

-

cos x

, если x > -1.

î

завершения работы с пользовательской формой.

Исходные данные:

Результат:

x =1

3,559752813

8.Создайте пользовательскую форму на языке VBA, изменяющую фон цвета на красный, фиолетовый и оранжевый. Изменения фона реализовать с помощью кнопок. Добавьте в форму кнопку Отмена для завершения работы с пользовательской формой.

9.Создайте пользовательскую форму на языке VBA, выводящую значения

ì x

+ sin x, если x £ -1,

ïe

Добавьте в форму кнопку Отмена для

функции y = í

ïx2

-

cos x

, если x > -1.

î

завершения работы с пользовательской формой.

Исходные данные:

Результат:

x =1

3,559752813

10.Создайте пользовательскую форму на языке VBA, выводящую сообщение «Ваши пожелания, пользователь» на событие Click. Добавьте в форму кнопку Отмена для завершения работы с пользовательской формой.

11.Создайте пользовательскую форму на языке VBA, выводящую значения

44

ì5

x

4

- x

2

+ e

x

ï

, если x < 3, Добавьте в форму кнопку Отмена для

3 - x

функции y = í

ï

2

sin x, если x ³ 3.

îx

завершения работы с пользовательской формой.

Исходные данные:

Результат:

x = 0

0,33333

12. Создайте пользовательскую

форму на языке VBA, вычисляющую

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

Исходные данные:

Результат:

–3, 1, 2

–6,00

13. Создайте пользовательскую форму на языке VBA, выводящую значения

ì

3

x

, если x < -2,

функции

ï

Добавьте в форму кнопку Отмена для

y = íx + 2

ï1- x2, если x ³ -2.

î

завершения работы с пользовательской формой.

Исходные данные:

Результат:

x = 2

–3,00000

14.Создайте пользовательскую форму на языке VBA, выводящую сообщение, какая из 3-х кнопок была нажата. Добавьте в форму кнопку Отмена для завершения работы с пользовательской формой.

15.Создайте пользовательскую форму на языке VBA, выводящую значения

ì

−x

, если x < 0,

ïe

Добавьте в форму кнопку Отмена для

функции y = í

ï

îsin(px), если x ³ 0.

завершения работы с пользовательской формой.

Исходные данные:

Результат:

x = −2

7,38905609893

16.Создайте пользовательскую форму на языке VBA, выводящую сообщение «Здравствуйте, пользователь» на событие Activate. Добавьте в форму кнопку Отмена для завершения работы с пользовательской формой.

17.Создайте пользовательскую форму на языке VBA, выводящую значения

ì

−x

, если x < 0,

ïe

Добавьте в форму кнопку Отмена для

функции y = í

ï

îsin(px), если x ³ 0.

завершения работы с пользовательской формой.

Исходные данные:

Результат:

x = −2

7,38905609893

18.Создайте пользовательскую форму на языке VBA, изменяющую фон цвета на зеленый. Изменения фона реализовать с помощью события DblClic.

Добавьте в форму кнопку Отмена для завершения работы с пользовательской формой.

19.Создайте пользовательскую форму на языке VBA, выводящую значения

45

ì

3

+

x - 6

, если x

< 5,

ï1+ x

Добавьте в форму кнопку Отмена для

функции y = í

x

ï

, если x ³ 5.

îx +1+ e

завершения работы с пользовательской формой.

Исходные данные:

Результат:

x = −1

7,0000

20.Создайте пользовательскую форму на языке VBA, выводящую сообщение, какой из 3-х переключателей был нажат. Добавьте в форму кнопку Отмена для завершения работы с пользовательской формой.

21.Создайте пользовательскую форму на языке VBA, выводящую значения

ì1+ sin px

+ x, если x £ -2,

ï

2

Добавьте в форму кнопку Отмена для

функции y = í

ï

3

-1, если x > -2.

îx

завершения работы с пользовательской формой.

Исходные данные:

Результат:

x =1

0,00

22.Создайте пользовательскую форму на языке VBA, выводящую сообщение «До свидания, пользователь» на событие Terminate. Добавьте в форму кнопку Отмена для завершения работы с пользовательской формой.

23.Создайте пользовательскую форму на языке VBA, выводящую значения

ì

1

, если x < 1,

ï

+

cos(2x)

функции y = í1

Добавьте в форму кнопку Отмена для

ïsin(ex ), если x ³ 1.

î

завершения работы с пользовательской формой.

Исходные данные:

Результат:

x = 0

0,50000

24.Создайте пользовательскую форму на языке VBA, изменяющую фон цвета на событие DblClic. Добавьте в форму кнопку Отмена для завершения работы с пользовательской формой.

25.Создайте пользовательскую форму на языке VBA, выводящую значения

ì

1+

x3

, если x < 0,

ï

ï

2

Добавьте в форму кнопку Отмена для

функции y = í

x

ï

, если x ³ 0.

ï

x+1

îe

завершения работы с пользовательской формой.

Исходные данные:

Результат:

x = 0

0,000

26.Создайте пользовательскую форму на языке VBA, выводящую сообщение о количестве нажатых галочек из 3-х флажков. Добавьте в форму кнопку Отмена для завершения работы с пользовательской формой.

27.Создайте пользовательскую форму на языке VBA, выводящую значения

46

ì

1+

1+ x

, если x < -7,

ï

2

+ sin(5x)

Добавьте в форму кнопку Отмена для

функции y = í

ï

- 7x−1, если x ³ -7.

îx

завершения работы с пользовательской формой.

Исходные данные:

Результат:

x = 2

–5,00000

28.Создайте пользовательскую форму на языке VBA, выводящую сообщение «Ваши дальнейшие указания, пользователь» на событие DblClic.

Добавьте в форму кнопку Отмена для завершения работы с пользовательской формой.

29.Создайте пользовательскую форму на языке VBA, выводящую значения

ì

2

sin x, если x < 0,

ïx

Добавьте в форму кнопку Отмена для завершения

функции y = í

x−1

ï

, если x ³ 0.

î6

работы с пользовательской формой.

Исходные данные:

Результат:

x =1

1,0000

30. Создайте пользовательскую форму на языке VBA, изменяющую фон цвета на голубой, желтый, зеленый. Изменения фона реализовать с помощью флажков. Добавьте в форму кнопку Отмена для завершения работы с пользовательской формой.

47

СОДЕРЖАНИЕ

Введение.......................................................................................................................

3

Часть 1. Создание макросов .......................................................................................

4

Часть 2. Создание программ с линейной структурой ...............................................

6

Часть 3. Создание программ с разветвляющейся структурой................................

11

Часть 4.

Создание программ с циклической структурой........................................

18

Часть 5.

Создание программ с массивами ...............................................................

27

Часть 6.

Создание программ с функциями ..............................................................

38

Часть 7.

Создание пользовательских форм .............................................................

43

Редактор Т.Л. Матеуш Технический редактор А.А. Щербакова

Подписано в печать 18.09.08. Формат 60×84 1/16. Бумага офсетная. Гарнитура Таймс. Печать трафаретная. Усл. печ. л. 2,8. Уч.-изд. л. 3.

Тираж 73 экз. Заказ 141.

Учреждение образования «Могилевский государственный университет продовольствия»

212027, Могилев, пр-т Шмидта, 3

ЛИ № 02330/0131913 от 08.02.2007 г.

Отпечатано на ризографе редакционно-издательского отдела

учреждения образования «Могилевский государственный университет продовольствия»

212027, Могилев, пр-т Шмидта, 3

ЛП № 226 от 12.02.2003 г.

48

Смотрите также файлы