Clear the Runtime-Created Controls from a Panel

I have a form.  On that form is a Panel called pnlData.
I dynamicly create controls on the panel data during runtime.

When a textbox gets focus, I have a "Popup" panel display a numberpad so the user can enter numbers into the field. (no keyboard)  

Here is a sample of the code that creates the 2nd panel...

   Private Sub crtNumPad(ByVal sender As TextBox)

        Dim pnlData() As Control = Me.Controls.Find("pnlData", True)

        Dim pnlNumPad As New Panel
        With pnlNumPad
            .Name = "plnNumPad"
            .Location = New System.Drawing.Point(sender.Location.X + 65, sender.Location.Y)
            .Size = New System.Drawing.Size(150, 200)
            .BackColor = Color.AliceBlue
            .Visible = True
        End With

        pnlData(0).Controls.SetChildIndex(pnlNumPad, 0)

        Dim btnTemp1 As New Button
        With btnTemp1
            .Name = "btnTemp1"
            .Location = New System.Drawing.Point(1, 1)
            .Size = New System.Drawing.Size(50, 50)
            .AutoSize = False
            .Text = "1"
        End With
        .....  more code....

End sub

Open in new window

When the user moves off of the field, I have the following subroutine..

    Private Sub txtItemQty_Leave(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Dim pnlData() As Control = Me.Controls.Find("pnlData", True)
        For Each ctrl As Control In pnlData(0).Controls
            If ctrl.Name = "pnlNumPad" Then
            End If
    End Sub

Open in new window

the pnlNumPad is not removed.  

Any ideas?
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

call refresh() after removing the control
Mike TomlinsonHigh School Computer Science, Computer Applications, and Mathematics TeachersCommented:
Why are you creating the "number pad" dynamically every time?

Just create it ONCE as a UserControl and store an instance of it in the Forms code.  When you need it add it to your Panel at run-time and remove it as necessary.  No need to dispose of it.

Is the panel added at design-time or run-time?

It appears that you are jumping thru hoops for no reason....
ScottParkerAuthor Commented:
    I tried that and it didn't work.

I dont know how to do user controls.  

The main panel pnlData is created at design-time but the controls on it are created during run-time.
Become a CompTIA Certified Healthcare IT Tech

This course will help prep you to earn the CompTIA Healthcare IT Technician certification showing that you have the knowledge and skills needed to succeed in installing, managing, and troubleshooting IT systems in medical and clinical settings.

Mike TomlinsonHigh School Computer Science, Computer Applications, and Mathematics TeachersCommented:
"I dont know how to do user controls."

Click on Project --> Add User Control, then add your Buttons and Code at DESIGN-Time.  Now re-Build the project and your new UserControl should be at the TOP of your ToolBox where you can drag one onto your form.

"The main panel pnlData is created at design-time ..."

Then you do NOT need to Find() the panel with Controls.Find("pnlData", True).  Just use its name like:

ScottParkerAuthor Commented:
Ok I built the User Control...

I am assuming that in the code for my original text boxes, in the Subroutine that I have hooked up to the "Enter" event, I will then set the location and visible property of this ucNumPad that I have already dropped on the screen (design time) and have hidden.  

But how would you suggest that ucNumPad know which textbox it should be updateing?
Mike TomlinsonHigh School Computer Science, Computer Applications, and Mathematics TeachersCommented:
You can set a "current" TextBox variable in your form before you display the ucNumPad.  Next, make your UserControl raise a custom event with the entered value.  Finally, declare your ucNumPad as "WithEvents" so the custom event can be trapped with the "Handles" clause.  When the custom event is received use the current TextBox variable to update the correct box.

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
ScottParkerAuthor Commented:
Seem to be having a couple of other issues with the user control.

When I drag the user control from the toolbox and drop it on the form, it looks normal.
Then when i drag it over to pnlData, the user control increases in size.

 I can not get it to show up.  I suspect that the dynimic control that I put on the plnData at run-time are covering it up.  I thought I moved it on to the plnData and I can see it there at design time, but when I do the following line of code,
pnlData.Controls.SetChildIndex(UcNumPad1, 0)

Open in new window

I get an error saying

ex.Message = "'child' is not a child control of this parent."
Mike TomlinsonHigh School Computer Science, Computer Applications, and Mathematics TeachersCommented:
You could explicitly add it just to make sure:

ScottParkerAuthor Commented:
Ok, I got everything to work...  Just 1 issue remaining...

The user control seems to have scaled up when it is on the pnlData and I do not understand why.  

If I drop it on the main form, then it looks like I designed it... But once it moves to the pnlData, it scales larger.  

Any ideas why?
Mike TomlinsonHigh School Computer Science, Computer Applications, and Mathematics TeachersCommented:
It might be a FONT issue.  Make sure the Font is the same for your form/panel/usercontrol.
ScottParkerAuthor Commented:
Thank you very much.
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Visual Basic.NET

From novice to tech pro — start learning today.