Microsoft Excel/Visual Basic for Applications в Excel/Переменные и константы. Арифметические и логические выражения: различия между версиями
Содержимое удалено Содержимое добавлено
→Решение задач: заготовка |
→Задача 3: решение |
||
Строка 224:
Dim S1 As String
Dim S2 As String
Dim Res As Boolean
S1 = InputBox("Введите первую строку:")
S2 = InputBox("Введите вторую строку:")
Res = Not ((S1 = "") Or (S2 = "") Or (S1 > S2))
MsgBox (Res)
End Sub
</source>
|