Excel (VBA). Посчитать значение функции sin(x)*cos(x)

Формулировка задачи:

Здравствуйте, все перепробовал... но никак не получается. Дело в том что нужно сделать небольшую программу которая будет считать значение функции sin(x)*cos(x). Расчеты будут производится на форме. Как выглядит форма.. картинку прикрепил)

Решение задачи: «Excel (VBA). Посчитать значение функции sin(x)*cos(x)»

textual
                            Листинг программы 
                        
 
                        
                          
                    
Private Sub CommandButton1_Click()
If InStr(TextBox1, ",") > 0 Then
    x = CDbl(TextBox1.Value)
Else
   x = Val(TextBox1)
End If
    TextBox2.Value = Sin(x) * Cos(x)
End Sub

Оцени полезность:

12 голосов , оценка 3.833 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Похожие ответы