Возможно ли через 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, ",", "."))
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д