TextBox - VB
Формулировка задачи:
Всем привет. Мне нужно чтобы значение с textbox переносилось в функцию f, чтобы в коде его не менять постоянно. По коду ниже не работает. Подскажите что делать
Решение задачи: «TextBox»
textual
Листинг программы
Function F(x As Double) As Double On Error Resume Next Dim SC: Set SC = CreateObject("ScriptControl") SC.Language = "VBScript" SC.ExecuteStatement ("x=" & Replace$(CStr(x), ",", ".")) F = SC.Eval(TextBox5.Text) End Function