🗊Презентация Условные конструкции VBA

Нажмите для полного просмотра!
Условные конструкции VBA, слайд №1Условные конструкции VBA, слайд №2Условные конструкции VBA, слайд №3Условные конструкции VBA, слайд №4Условные конструкции VBA, слайд №5Условные конструкции VBA, слайд №6Условные конструкции VBA, слайд №7Условные конструкции VBA, слайд №8Условные конструкции VBA, слайд №9Условные конструкции VBA, слайд №10

Вы можете ознакомиться и скачать презентацию на тему Условные конструкции VBA. Доклад-сообщение содержит 10 слайдов. Презентации для любого класса можно скачать бесплатно. Если материал и наш сайт презентаций Mypresentation Вам понравились – поделитесь им с друзьями с помощью социальных кнопок и добавьте в закладки в своем браузере.

Слайды и текст этой презентации


Слайд 1





Условные конструкции VBA
Описание слайда:
Условные конструкции VBA

Слайд 2





Простые конструкции
Описание слайда:
Простые конструкции

Слайд 3





Пример
Описание слайда:
Пример

Слайд 4





Сложная конструкция
Описание слайда:
Сложная конструкция

Слайд 5





Пример
Если количество работников на предприятие до 100 человек – это малое предприятие, если от 100-300 – среднее, от 300-500 – крупное, в противном случаи – корпорация.
Описание слайда:
Пример Если количество работников на предприятие до 100 человек – это малое предприятие, если от 100-300 – среднее, от 300-500 – крупное, в противном случаи – корпорация.

Слайд 6


Условные конструкции VBA, слайд №6
Описание слайда:

Слайд 7





Sub  prim()
Sub  prim()
Dim K as Integer, P as String
K=InputBox(“Ввести количество сотрудников”,”Количество сотрудников”)
If K<=100 Then
 P=“малое предприятие”
ElseIf (K>100) and (K<=300) Then
 P=“Среднее предприятие”
ElseIf (K>300) and (K<=500) Then
 P=“Крупное предприятие”
Else
 P=“Корпорация”
EndIf
MsgBox “Статус предприятия - ”&P,,”Определение статуса предприятия: кол-во сотрудников=”&Str(K)
EndSub
Описание слайда:
Sub prim() Sub prim() Dim K as Integer, P as String K=InputBox(“Ввести количество сотрудников”,”Количество сотрудников”) If K<=100 Then P=“малое предприятие” ElseIf (K>100) and (K<=300) Then P=“Среднее предприятие” ElseIf (K>300) and (K<=500) Then P=“Крупное предприятие” Else P=“Корпорация” EndIf MsgBox “Статус предприятия - ”&P,,”Определение статуса предприятия: кол-во сотрудников=”&Str(K) EndSub

Слайд 8





Ввод исходных данных
Описание слайда:
Ввод исходных данных

Слайд 9





Результат
Описание слайда:
Результат

Слайд 10





Задания на лабораторную работу
Задание №1. Точка на плоскости задана координатами (x,y). Определить, принадлежит ли точка плоскости, ограниченной окружностью с центром в начале координат и радиусом R?
	(условие принадлежности x2+y2<R2)
Задание №2. У Маши имеется N рублей. В магазине ей понравилась сумка за  S рублей, туфли за T рублей и портмоне за К рублей. Маше хватает денег только на два каких-то товара. Какие две вещи может она может купить?
Задание №3. Ввести положительное А>=1. Найти наибольшее из выражений вида 1/А и SIN(A).
Описание слайда:
Задания на лабораторную работу Задание №1. Точка на плоскости задана координатами (x,y). Определить, принадлежит ли точка плоскости, ограниченной окружностью с центром в начале координат и радиусом R? (условие принадлежности x2+y2<R2) Задание №2. У Маши имеется N рублей. В магазине ей понравилась сумка за S рублей, туфли за T рублей и портмоне за К рублей. Маше хватает денег только на два каких-то товара. Какие две вещи может она может купить? Задание №3. Ввести положительное А>=1. Найти наибольшее из выражений вида 1/А и SIN(A).



Похожие презентации
Mypresentation.ru
Загрузить презентацию