Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionOption Strict On Public Class Form1 Dim SC As New MSScriptControl.ScriptControl Private Sub Form1_Load(sender As Object, e As System.EventArgs) Handles Me.Load SC.Language = "VBScript" End Sub Private Sub TextBox1_TextChanged(sender As System.Object, e As System.EventArgs) Handles TextBox1.TextChanged Try TextBox2.Text = SC.Eval(TextBox1.Text).ToString Catch ex As Exception End Try End Sub End Class