A really easy way is to add a scripting control into your form.

Example (assuming the scripting control is set to vbscript and is called sc1)

Private Sub Form_Load()
dim thestring as string
thestring = "msgbox " & """Hello!"""
sc1.ExecuteStatement thestring
End Sub

This works, but its more like online vbscript than actual vb which is bad if you wanted to do something like "dim hello as string" it would have to just be "dim hello" and such

Hope that helps

- DeathIncarnate