Top.Mail.Ru
Ответы
Аватар пользователя
7лет
Изменено
Аватар пользователя
Аватар пользователя
Аватар пользователя
Программирование
+3

VBA If MsgBox Как сделать что бы MsgBox Выводилось после неудовлетворения других вариантов if?

Как сделать что бы MsgBox Выводилось после неудовлетворения других вариантов if?
If a = Sqr(b) Then MsgBox ("Первое число-квадратный корень воторого") Else
If b = Sqr(a) Then MsgBox ("Второе число-квадратный корень первого") Else
MsgBox ("Введенные вами числа:" & vbNewLine & "Первое= " & a & vbNewLine & "Второе= " & b & vbNewLine & "Не удовлетворяют условию")

Как сделать что бы MsgBox Выводилось после неудовлетворения других вариантов if?

По дате
По рейтингу
Аватар пользователя
Новичок
7лет

Я в VBA не очень, но в VBS используется оператор ElseIf.

If True Then
MsgBox "Hello 1", 0, "Hello 111"
ElseIf True Then
MsgBox "Hello 2", 0, "Hello 222"
Else
MsgBox "Hello 3", 0, "Hello 333"
End If

Аватар пользователя
Искусственный Интеллект
7лет

добавить Else