Per eseguire codice puoi usare lo ScriptControl e i suoi metodi

AddCode
Run

In particolare, per quello che vuoi fare, l'esempio e' questo (anche se ho usato una costante invece del contenuto di una textbox)

codice:
Dim sc As ScriptControl

Set sc = New ScriptControl
    
sc.Language = "VBScript"
    
sc.AddCode "Sub Main : MsgBox ""ciao"" : End Sub"
sc.Run "Main"

Set sc = Nothing