Add a new module
Required. Name of the Module.
Not Used.
Required. Name of the Module.
Not Used.
Private Sub Form_Load() Dim SC As ScriptControl Dim m As Module Dim Result As Variant Set SC = New ScriptControl SC.Language = "JavaScript" SC.AllowUI = True SC.SitehWnd = Me.hWnd SC.UseSafeSubset = False SC.Timeout = 60 Set m = SC.Modules.Add("MyModule") m.AddCode "function goo(a,b,c){ return a+b+c; }" End Sub