VB Tips & Tricks - Execute VB code from a string

VB Tips & Tricks - Page 2 -Visual Basic

Private Sub Form_Load()
  Text1.Text = "cmdText1.Visible = False"
  Call ScriptControl1.AddObject(cmdText1.Name, cmdText1)
End Sub

Private Sub Command1_Click()
  Call ScriptControl1.ExecuteStatement(Text1.Text)
End Sub