Wie konvertiert man Zeichenkette in Ausdruck mit VB.Net? Diese

Question

ist die Vorschau meiner Anwendung:

Hier möchte ich meine Ergebnis TextBox Ergebnis der String geben sollte von Funktion TextBox ...

Beispiel Mein Code:

Private Sub btnSubmint_Click(sender As Object, e As EventArgs) Handles btnSubmint.Click 
    txtResult.Text = CovertStringToExpression(txtFunction.Text) 
End Sub 

Zum Beispiel Wenn ich txtFunction.Text = "txtInput.Text" schreiben, dann die TextBox Ergebnis sollte Text, "Hallo Welt" zeigen

Screenshot:

ODER

Hinweis:

TxtInput = Eingang TextBox

txtFunction = Funktion TextBox

txtResult = Ergebnis TextBox

Answer 1

Oh, das s einfach! Sie müssen die Art ändern, in der Sie versuchen, den Code zu aktivieren ...

Folgen Sie diesen wenigen einfachen Schritten.

Schritt 1

Schritt 2

Schritt 3

Schritt 4

Schritt 5 - Hinzufügen Script Objekt in Ihrem Formular

Schritt 6

Fügen Sie diese Codes zu Ihrem Formular.

Private Sub TestForm_Load(sender As Object, e As EventArgs) Handles MyBase.Load 
    AxScriptControl1.AddObject("txtInput", txtInput) 
    AxScriptControl1.AddObject("txtResult", txtResult) 
    AxScriptControl1.AddObject("txtFunction", txtFunction) 
End Sub 

Private Sub btnSubmint_Click(sender As Object, e As EventArgs) Handles btnSubmint.Click 
    AxScriptControl1.ExecuteStatement(txtFunction.Text) 
End Sub 

Nun, wenn Sie txtResult.Text = txtInput.Text in Funktion Textfeld eingeben, und klicken Sie auf Absenden-Button Sie das gewünschte Ergebnis erhalten.

Hoffe es hilft!