Возможно ли через textbox ввести формулу для модуля - VBA

Узнай цену своей работы

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

Нужна помощь,каким образом можно перевести записанную формулу из текстбокса в программный код. Dim proverka As Variant c = CStr(TextBox1) i = Len(c) ReDim stroka(i) As String For i = 1 To Len(c) stroka(i) = Mid(c, i, 1) Next proverka = CDbl(stroka(0) & stroka(1) & stroka(2) & stroka(3) & stroka(4) & stroka(5) & stroka(6) & stroka(7)) пытался таким способом проверить,возможно ли это сделать с (1+1)^2 этой формулой.но как и ожидалось вылетел type mismath Может,кто-нибудь уже делал такое,подскажите,пожалуйста)

Решение задачи: «Возможно ли через textbox ввести формулу для модуля»

textual
Листинг программы
Label1 = Evaluate(Replace(TextBox1, ",", "."))

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


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

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

10   голосов , оценка 4.2 из 5