Removing a Control Array

[coldude]

Hi,

i have been playing with some code that creates Control array labels that display dates down in a column in a Windows Form, but i am having trouble with removing Control array labels if a date range changes.

How do i remove a Control Array Label? in the case where the quantity of labels required where to be reduced by the Control Form control selecting the start and end dates.

some of the code that i have been playing with is attached below.



************************************
************************************

' remove the day array. 'this part doesnt work in my case..

For pd As Integer = 0 To 12
Me.Controls.Remove(lblDayArray(pd))

Next


strDayRow = datAStartDate.ToString("dddd,dd MMMM")

'using the label DayArray create days in rows
For i As Integer = 0 To DayDiff
lblDayArray(i) = New Label
Me.Controls.Add(lblDayArray(i))
With lblDayArray(i)
.TextAlign = ContentAlignment.MiddleRight
.BorderStyle = BorderStyle.None
.Location = New Point(intDInitLocationX, intLocationY)
.Size = New Size(intDInitSizeL, intInitSizeH)
.Text = strDayRow
.Name = "lblDay(i)"
End With

intLocationY = intLocationY + intSpacingY 'increments to next day
datAStartDate = dpStartDateRange.Value
datAStartDate.AddDays(1)
Next

[SammyB]

You use the control's name as a parameter to the Remove.
Here's code that worked for me:

Option Explicit
Dim newLabel(1 To 2) As Label
Private Sub Command1_Click()
    Set newLabel(1) = Me.Controls.Add("vb.label", "Label1", Me)
    newLabel(1).Visible = True
    newLabel(1).Move 0, 0, 500, 200
    newLabel(1).Caption = "WOW!"
 
    Set newLabel(2) = Me.Controls.Add("vb.label", "Label2", Me)
    newLabel(2).Visible = True
    newLabel(2).Move 0, 300, 500, 200
    newLabel(2).Caption = "Cool!"
End Sub
Private Sub Command2_Click()
    Me.Controls.Remove newLabel(1).Name
End Sub
Private Sub Command3_Click()
    Me.Controls.Remove newLabel(2).Name
End Sub

[Killer42]

So the Remove method accepts a string (name) rather than a reference to the control, is that right? (I'm not .Net-savvy, yet.)

[SammyB]

So the Remove method accepts a string (name) rather than a reference to the control, is that right? (I'm not .Net-savvy, yet.)

I assumed from Dude's code that it was VB6 or VBA, so my post was written in VB6. In VB6 (and VBA), you use the name string, but in VB.NET you use the control object. (For VB.NET, see http://msdn2.microsoft.com/en-us/lib...on.remove.aspx)

[Killer42]

I assumed from Dude's code that it was VB6 or VBA, so my post was written in VB6. In VB6 (and VBA), you use the name string, but in VB.NET you use the control object. (For VB.NET, see http://msdn2.microsoft.com/en-us/lib...on.remove.aspx)

Oh! The Remove exists in VB6? I've never come across it. I thought it was somehow part of the technique used to simulate control arrays in VB.Net.

In Vb6, I would have just advised to Unload the elements of the array. In other words, Unload Newlabel1(1). It's just like loading or unloading a form.