Друзья дали задание Решить в екселе через бейсик вот эту формулу, я пытался но выскакивает ошибка постоянно. Кому не лень распишите пожалуйтса!
Нужно расписать в бейсике через ексель, что бы кнопка выдавала результат сама
Приложения:
![](https://st.uroker.com/files/423/423908ba019c7fc4bc04ac26167f4b2b.jpg)
Ответы
Ответ дал:
0
Sub CommandButton1_Click()
' Dim x, a, b, c, y As Double
x = 5.2319
a = -2.9565
b = 0.8204
c = 0.05
y = -Exp(b) + (a ^ 2 - Sin(3 * (x) ^ 3) ^ 2) / (Sqr(b ^ 2 - c) + x ^ (1 / 3))
MsgBox y
End Sub
Вот так у меня выдает правильный ответ
' Dim x, a, b, c, y As Double
x = 5.2319
a = -2.9565
b = 0.8204
c = 0.05
y = -Exp(b) + (a ^ 2 - Sin(3 * (x) ^ 3) ^ 2) / (Sqr(b ^ 2 - c) + x ^ (1 / 3))
MsgBox y
End Sub
Вот так у меня выдает правильный ответ
Ответ дал:
0
В форме у меня еще присутствует кнопка вычесления и "Textbox" то есть нужно связать эти две форсы только как?
Ответ дал:
0
кнопка походу уже связана. если судить по названию процедуры
Ответ дал:
0
ну а текст бокс - это нужно его название и свойство которое принимает текст/значение.
Ответ дал:
0
Формат: Имя.Свойство = текст
Ответ дал:
0
Кстати что там за ошибка у тебя вылазила?
Вас заинтересует
1 год назад
1 год назад
6 лет назад
8 лет назад
9 лет назад