Как считать в текстовом поле? - VB

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

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

Например пользователь написал текст в текстовом поле. В этом поле есть цифры и переменная x. Как подсчитать это выражение, если х определен?

Решение задачи: «Как считать в текстовом поле?»

textual
Листинг программы
Private Sub Command1_Click()
x = 3
Set objScript = CreateObject("MSScriptControl.ScriptControl")
objScript.Language = "VBScript"
On Error Resume Next
objScript.AddCode ("Function UserFunc(x)" & _
                ":UserFunc = " & Text1.Text & _
                ":End Function")
If Err Then MsgBox "Неверный синтаксис функции!": Exit Sub
MsgBox Text1.Text & " = " & objScript.Run("UserFunc", x) & " при Х=" & x
End Sub

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


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

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

15   голосов , оценка 3.933 из 5
Похожие ответы