Главная Случайная страница Контакты | Мы поможем в написании вашей работы! | ||
|
Вычислить значение Y в зависимости от условий двумя способами, используя:
1. только оператор IF;
2. оператор IF, операции AND (OR).
при
Private Sub Command1_Click() '1 method x = Val(Text1.Text) If x < -1 Then y = 1 ElseIf x > 1 Then y = x Else y = x - 1 End If Label5.Caption = y End Sub Private Sub Command2_Click() End End Sub Private Sub Command3_Click() '2 method x = Val(Text1.Text) y = 1 If x >= -1 And x <= 1 Then y = x - 1 ElseIf x > 1 Then y = x End If Label5.Caption = y End Sub |
Дата публикования: 2014-11-03; Прочитано: 265 | Нарушение авторского права страницы | Мы поможем в написании вашей работы!