Public WithEvents CSE As CSE
With Me.Controls.Add("iolausVOKPro.CSE", "CSE", Me.OsnSloi)
.Top = 0
.Visible = True
End With
Set CSE = Me.Controls("CSE")
Dim sCtlType As String
Dim Control As Control
For Each Control In Me.Controls
sCtlType = TypeName(Control)
If sCtlType = "CSE" Then
Me.Controls.Remove Control '!!!!!!!!!!!!!!!!!!
End If
Next Control
собственно не хочет он удлять такой контрол. подскажите как его убрать?
Заранее спасибо