Преобразовать выражение с TextBox - VB
Формулировка задачи:
Здравствуйте, помогите решить вопрос: допустим я ввожу в TextBox Sin(x * 1) * 5
и мне нужно сохранить сам результат такого выражения в переменную, т.е. как-то преобразовать полученные данные с TextBox.
Подскажите пожалуйста такую функцию.
Решение задачи: «Преобразовать выражение с TextBox»
textual
Листинг программы
- Private Sub Command1_Click()
- Dim s As String, x As Double
- x = 0.2
- s = "Sin(x * 1) * 5"
- s = Replace(s, "x", x)
- Text1.Text = s
- MsgBox ScriptControl1.Eval(Replace(Text1.Text, ",", "."))
- End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
