Мой Kbyte.Ru
Рассылка Kbyte.Ru
Группы на Kbyte.Ru
Партнеры Kbyte.Ru
Реклама
Сделано руками
Сделано руками
> Исходные коды - Петр (Skript) Пономарев -

Visual Basic 5.0/6.0 - Общие вопросы

Все примеры / Общие вопросы

Простая задача с использованием оператора ElseIf

Автор: Петр (Skript) Пономарев | добавлено: 02.02.2011, 02:11 | просмотров: 3376 (2+) | комментариев: 0 | рейтинг: *x6
Простой пример использования оператора ElseIf на Visual Basic 6.0. В программу вводится число (пусть для конкретности это будет дальность какого-нибудь выстрела). Если оно находится в интервале от 28 до 30, то напечатать текст ПОПАЛ, иначе - НЕ ПОПАЛ.

Инструкции

Все очень просто. Инструкция не требуется.

Код

Private Sub Command1_Click()
 a = InputBox("Введите число")
 If a < 28 Then
  MsgBox (" не попал")
 ElseIf a < 30 Then
  MsgBox ("Попал")
 Else
  MsgBox ("попал")
 End If
End Sub
Обратите внимание
Язык Visual Basic 6.0 является устаревшим. Многие примеры, размещенные на нашем сайте, были созданы еще во времена Windows 98 и могут не работать в современных операционных системах.
Если у вас возникнут какие-либо проблемы или вопросы, вы можете обратиться за помощью на наш форум.
Об авторе

Петр (Skript) Пономарев

Нет информации об авторе...

См. также:
Профиль автора
Петр (Skript) Пономарев
Последние комментарии (всего: 0)

Добавлять комментарии могут только зарегистрированные пользователи сайта.
Если у Вас уже есть учетная запись на Kbyte.Ru, пройдите процедуру авторизации OpenID.
Если Вы еще не зарегистрированы на Kbyte.Ru - зарегистрируйтесь.


Нет комментариев...

Авторизация
 
OpenID
Зарегистрируйся и получи 10% скидку на добавление своего сайта в каталоги! Подробнее »
Поиск по сайту
Реклама
Счетчики