Домашняя страница Undo Do Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Статьи об Excel

МЕНЮ САЙТА
  • 1
  • 2
  • 3

КАТЕГОРИИ РАЗДЕЛА
Циклы [4]
Циклы VBA
Операторы ветвления [2]
Модули классов [2]
Создание, поля, свойства, события, когда использовать
Работа с приложениями и библиотеками [2]
Создание надстроек для ексель на .net, вызов компонентов .net

ОПРОСЫ
Какой версией Excel Вы пользуетесь?
Всего ответов: 35704
Главная » Статьи » Программирование на VBA » Операторы ветвления

Оператор ветвления If…Then…Else…End if

Оператор ветвления (условный оператор) - это структура, которая представляет собой простую форму проверки заданных условий, впоследствии чего выполняются определенные операторы.

Оператор If…Then…Else…End if имеет следующий синтаксис:
If условие Then 1й_оператор Else 2й_оператор

1й_оператор выполняется в том случае, когда заданное условие является истиной, если же условие не равняется истине – тогда выполняется 2й_оператор.

Условный оператор If можно использовать в трёх видах:

1. If условие Then оператор

Пример №1:

Sub example1()
 If 100 = 100 Then MsgBox True
End Sub
В примере №1 приведена краткая форма записи, что означает: если(if) 100 = 100(условие) тогда(then) Msgbox True(оператор)

2. If условие Then 1й_оператор Else 2й_оператор End If

Пример №2:

 

Sub example2()
 If 100 < 10 Then
 MsgBox True
 Else
 MsgBox False
 End If
End Sub
В примере №2 приведена полная форма записи с двумя операторами, что означает: если(if) 100 < 10(условие) тогда(then) Msgbox True(1й_оператор) иначе(else) Msgbox False(2й_оператор) конец(end if)

3. If 1е_условие Then 1й_оператор ElseIf 2е_условие Then 2й_оператор End If

Пример №3:
Sub example3()
 If 100 = 120 Then
 MsgBox 120
 ElseIf 100 = 100 Then
 MsgBox 100
 End If
End Sub

В примере №3 приведена самая гибкая форма условного оператора If (структура с двумя операторами и двумя условиями), что означает: если(if) 100 = 120(1е_условие) тогда(then) Msgbox 120(1й_оператор) иначе если(ElseIf) 100 = 100(2е_условие) тогда(then) Msgbox 100(2й_оператор)
Категория: Операторы ветвления | Добавил: LightZ (31.03.2013)
Просмотров: 21734 | Рейтинг: 5.0/3


Всего комментариев: 0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]
Яндекс цитирования
© 2010-2016 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!