Преобразовать выражение с 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

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

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

8   голосов , оценка 4.125 из 5