Option Explicit
 
' Deklaration als Public unbedingt erforderlich
Public Zahl As Double
Private Sub Form_Load()
  ' Dem Scripting Control die Kontrolle
  ' über Die Form und seine Mitglieder geben
  ScriptControl1.AddObject "Form", Form1, True
End Sub
Private Sub Command1_Click()
  ' Code ausführen
  ScriptControl1.AddCode "Form.Zahl =" & Text1.Text
 
  ' Ergebnis der Berechnung im 
  ' Label-Control anzeigen
  Label1.Caption = Zahl
End Sub

Wer alles wei? kann sich ja zur?ck legen... und schlau tun ... ich geh?re nicht dazu...*lol*