Putz, não entendo muito de JScript mas um exemplo simples seria assim:
Temos uma textbox denominada txtScript e sendo SC um objeto ScriptControl, logo:
Dim Code As String
Private Sub Command1_Click()
On Error GoTo erro
Code = txtScript
SC.Language = "JSCript"
MsgBox SC.Eval(Code)
erro:
If Err.Number <> 0 Then
MsgBox Err.Description
End If
End Sub
Na textbox (txtScript) vc coloca assim por exemplo: 'Alô Mundo'
veja se ajuda...
at+