Подскажите, плиз, как удалить из формы объект, ранее созданный кодом?  
 
Delete не воспринимает... (Первый цикл кода)  
 
Вот код создания объектов:  
 
Option Explicit  
Public y As Object  
Public n As Long  
Public m As Variant  
Public PBX As PictureBox  
Public z As Object  
 
Sub Znachki()  
Dim x As Long  
Dim g As Long  
 
For Each y In Menu.Controls  
If TypeName(y) = "PictureBox" Then  
n = n + 1  
y.Delete  
End If  
Next y  
 
m = -240: n = 0: g = 1  
 
For Each z In Menu.TreeView1.Nodes  
   m = m + 240  
   If Menu.TreeView1.Nodes.Item(g).Children > 0 Then GoTo P1  
       n = n + 1  
       Set PBX = Menu.Controls.Add("VB.PictureBox", "PBX" & n)  
       With PBX  
           .Align = 0: .Appearance = 0: .AutoRedraw = False  
           .AutoSize = False: .BackColor = 16777215  
           .BorderStyle = 0: .Enabled = True  
           .TabIndex = 1: .Height = 255: .Left = 720: .Width = 255  
           .Top = m  
           .Picture = LoadPicture("C:\Anton\Programms\MVB\Проекты\Icons for AP\DBM1.gif")  
           .Visible = True: .ZOrder 0  
       End With  
P1: g = g + 1  
Next z  
 
End Sub