Button in Userform

Hallo,
mein problem ist folgendes:
ich habe mit VBA eine Userform mit unter anderem auch einem Commandbutton.
Sieh so aus.
Set okbutton = Me.Controls.Add("Forms.commandbutton.1", "okbutton", True)
With okbutton
.Left = 360
.Top = 355
.Width = 60
.Height = 20
.FontSize = 8
.Caption = "Schliessen"
End With

jetzt Frage ich ab:
Private Sub okbutton_Click()
Unload Me
End Sub

und das funzt nicht.Keine Reaktion.

msgbox okbutton.visible=true ergibt wahr.
Was ist falsch ?
Danke vorab Peter