I am having problems accessing properties of dynamically generated
objects in VB2005. Can someone please help?
In a nutshell:
My app creates an equal number of checkboxes and labels that share the
same Tag number. (I thought it might help)
The checkboxes name is a concatenation of "chkCancel" and a number that
represents the order in which they were created:
chkCancel0 (Tag = 0)
chkCancel1 (Tag = 1)
chkCancel2 (Tag = 2)
etc...
The same goes for the labels
lblLabel0 (Tag = 0)
lblLabel1 (Tag = 1)
lblLabel2 (Tag = 2)
etc...
When the label is created, its text property is given a value
(lblLabel.text = value).
What I want to do, is clear that text property when I click on the
corresponding checkbox.
I want to do it with a common sub, handler, whatever, that will work
for all checkboxes.
My problem is how to acces the label text property of a dynamically
created label.
Pseudo code:
lableTag = sender.tag
if sender.checked=true then
lblLabel(labelTag).text="" (this is the part I have trouble with)
I don't seem to be able to reference any object created dynamically...
It must be very simple for an experienced programmer, but not to
vbnewbie... and it is driving me nuts!
Thanks
12  13097 
Your event handler will go something like this:
Private Sub DynamicCheckBox_CheckChanged(ByVal sender As Object, ByVal e
As EventArgs)
Dim _tag As Object = CType(sender, Control).Tag
If _tag IsNot Nothing Then
Dim _c As Control = FindControl(Me, GetType(Label), _tag)
If _c IsNot Nothing Then CType(_c, Label).Text = String.Empty
End If
End Sub
Private Function FindControl(ByVal start As Control, ByVal type as Type,
tag As Object) As Control
For Each _c as Control In start.Controls
If _c.GetType() Is type Then
If _c.Tag IsNot Nothing AndAlso _c.Tag = tag Then Return _c
Else
If _c.HasChildren Then
Dim _cc As Control = FindControl(_c, type, tag)
If _cc IsNot Nothing Then Return _cc
End If
End If
Next
Return Nothing
End Function
When you 'dynamically generate' your CheckBox controls, subscribe to the
event handler with something like:
AddHandler chkCancel0.CheckChanged, AddressOf
DynamicCheckBox_CheckChanged
AddHandler chkCancel1.CheckChanged, AddressOf
DynamicCheckBox_CheckChanged
etc. Note that the same handler is used.
Note also that the event handler does not have a Handles clause.
When any one of you dynamic CheckBoxes is clicked, the event handler is
called and sender is a reference to the CheckBox that was clicked. We then
attempt to get a reference to a Label control anywhere on the form that has
a matching Tag property. If we get one then we set it's Text Property to an
empty string.
Let us konw how you get on.
"vbnewbie" <bi*****@gmail.comwrote in message
news:11**********************@n51g2000cwc.googlegr oups.com...
>I am having problems accessing properties of dynamically generated
objects in VB2005. Can someone please help?
In a nutshell:
My app creates an equal number of checkboxes and labels that share the
same Tag number. (I thought it might help)
The checkboxes name is a concatenation of "chkCancel" and a number that
represents the order in which they were created:
chkCancel0 (Tag = 0)
chkCancel1 (Tag = 1)
chkCancel2 (Tag = 2)
etc...
The same goes for the labels
lblLabel0 (Tag = 0)
lblLabel1 (Tag = 1)
lblLabel2 (Tag = 2)
etc...
When the label is created, its text property is given a value
(lblLabel.text = value).
What I want to do, is clear that text property when I click on the
corresponding checkbox.
I want to do it with a common sub, handler, whatever, that will work
for all checkboxes.
My problem is how to acces the label text property of a dynamically
created label.
Pseudo code:
lableTag = sender.tag
if sender.checked=true then
lblLabel(labelTag).text="" (this is the part I have trouble with)
I don't seem to be able to reference any object created dynamically...
It must be very simple for an experienced programmer, but not to
vbnewbie... and it is driving me nuts!
Thanks
My code is shorter than Stephany Young's:
Private Sub ChkCancel_CheckChanged(ByVal sender As Object, ByVal e As
EventArgs) Handles chkCancel0.CheckChanged And chkCancel1.CheckChanged
And chkCancel2.CheckChanged And chkCancel3.CheckChanged
Select Case CType(sender, Control).Tag
Case 0
lblLabel0.Text=""
Case 1
lblLabel1.Text=""
Case 2
lblLabel2.Text=""
Case 3
lblLabel3.Text=""
End Select
End Sub
Of course it will be longer depending on how many checkboxes you have.
You could also add an error handler in case CType(sender, Control).Tag
returned something it shouldn't.
The error handler code would look like this:
Case Else
MessageBox.Show("Error!","Error!",MessageBoxButton s.OK,MessageBoxIcon.Hand,MessageBoxDefaultButton.B utton1)
This code would go betwwen the last line inside the Select and End
Select
mediocrevbprogrammer.freed
Well Matthew ,
My code is shorter than Stephany Young's:
i am happy you swallowed bether :-)
It is a different aproach , with its own pro`s and con`s ( as with all
aproaches :-)
However i have one small mod
you would better make label.Text="" to label.Text=string.empty
as string.empty is a constant and doesn`t requir a scan through the string
table ( it is faster , and safer "" vs " " oops )
regards
Michel
"mediocrevbprogrammer.freed" <an*************************@gmail.comschreef
in bericht news:11**********************@a3g2000cwd.googlegro ups.com...
My code is shorter than Stephany Young's:
Private Sub ChkCancel_CheckChanged(ByVal sender As Object, ByVal e As
EventArgs) Handles chkCancel0.CheckChanged And chkCancel1.CheckChanged
And chkCancel2.CheckChanged And chkCancel3.CheckChanged
Select Case CType(sender, Control).Tag
Case 0
lblLabel0.Text=""
Case 1
lblLabel1.Text=""
Case 2
lblLabel2.Text=""
Case 3
lblLabel3.Text=""
End Select
End Sub
Of course it will be longer depending on how many checkboxes you have.
You could also add an error handler in case CType(sender, Control).Tag
returned something it shouldn't.
The error handler code would look like this:
Case Else
MessageBox.Show("Error!","Error!",MessageBoxButton s.OK,MessageBoxIcon.Hand,MessageBoxDefaultButton.B utton1)
This code would go betwwen the last line inside the Select and End
Select
mediocrevbprogrammer.freed
mediocrevbprogrammer.freed 's code WOULD work if the controls were
created at design time.
Since they are not, I get an error because the label have not been
declared (How could I declare them since they don't exist!)
What would be nice is to have some type of code that would let me
modify or get a value from a control property such as:
tag as a variable (0, 1,2, etc)
lblLabel(tag).Text=""
This is something very usfull in VBA
The other part that does not work in mediocrevbprogrammer.freed 's is
the fact the number of labels that can be created in my app is
limitless. Which means I would need to be able to modify the number of
Cases, or get rid of the Case-End Case all together in favor of a
variable appended to the control name: lblLabel name = lblLabel(tag
number).
Is that at all possible?
Stephany's code worked practically out of the box! Thanks!
A few questions, though.
I am not sure what the undescores stand for.
I am also confused (in this case and others) as to how the Me keyword
works. If you could explain it in this case at least, It would get me
on my way to understand other cases. For example, if you could replace
Me with something else, what would it be?
I understand that your code checks all controls to see if they are
labels and if true checks if the tag number matches. It also searches
if each control found has children etc...
If all the labels and checkboxes where on a panel (say Panel1), what
would you have done differently to simpify the code?
This bit of code has made me understand quite a few things. Thanks!
The underscores, e.g. _tag, are nothing more that a convention that I use
for local variable naming.
The Me keyword provides a way to refer to the specific instance of a class
or structure in which the code is currently executing.
In this case Me refers to the instance of the form where the
DynamicCheckBox_CheckChanged event handler is declared and it is used to
pass a reference to the form to the FindControl function, which, by the way,
could be declared in some other class or module outside the form.
The first parameter of the FindControl function is declared as type Control
which means that it will accept any variable that is a reference to an
instance of a class that is derived Control. (Even a Form is derived from
Control.)
The FindControl function is recursive. This means that it continually calls
itself until some condition or other is met. In this case the condition is
that we have found the Label that we are looking for.
Note that when it does call itself, it passes the control that it is
currently dealing with as the first parameter, instead of Me. It is this
taht allows it to 'walk' the 'tree' of controls on the form.
If you knew that all the Labels thate you were interested in were on Panel1,
then you would pass Panel1 as the first parameter instead of Me in the
original call to FindFunction and only the controls that are 'children' of
Panel1 (and their 'chidren') will be inspected.
I didn't notice in your OP that you are using VB.NET 2005. In version 2.0 of
the .NET Framework, (the version used by VB.NET 2005), some nice new methods
were added to a number of classes. One in particular is the
Control.ControlCollection.Find method.
When you reference the Controls property of any control, you are actually
dealing with a ControlCollection object and all it's properties and methods
are automatically made available to you.
The ControlCollection.Find method takes, as it's parameters, a string
representing the name of a control and a boolean indicating whether or not
all child controls should be searched and it returns an array of controls
with 1 element for each control that matches the name parameter.
If we use this method then the whole thing becomes much simpler:
Private Sub DynamicCheckBox_CheckChanged(ByVal sender As Object, ByVal e
As EventArgs)
Dim _tag As Object = CType(sender, Control).Tag
If _tag IsNot Nothing Then
Dim _c As Control() = Controls.Find("lblLabel" & CType(_tag, String),
True)
If _c.Length 0 Then CType(_c(0), Label).Text = String.Empty
End If
End Sub
and the the FindControl function is no longer required.
Note that:
Dim _c As Control() = Controls.Find("lblLabel" & CType(_tag, String),
True)
and
Dim _c As Control() = Me.Controls.Find("lblLabel" & CType(_tag, String),
True)
are functionally equivalent and the call will search all the control on the
form.
Again, if you know that all the labels of interest are on Panel1 then the
line could read:
Dim _c As Control() = Panel1.Controls.Find("lblLabel" & CType(_tag,
String), True)
which will only search all the control on Panel1.
One thing that you will learn as you go along is that there is often more
then 1 way acheiving something. Some ways may be more efficient that others.
it is a matter of finding what works for you.
"vbnewbie" <bi*****@gmail.comwrote in message
news:11********************@k21g2000cwa.googlegrou ps.com...
mediocrevbprogrammer.freed 's code WOULD work if the controls were
created at design time.
Since they are not, I get an error because the label have not been
declared (How could I declare them since they don't exist!)
What would be nice is to have some type of code that would let me
modify or get a value from a control property such as:
tag as a variable (0, 1,2, etc)
lblLabel(tag).Text=""
This is something very usfull in VBA
The other part that does not work in mediocrevbprogrammer.freed 's is
the fact the number of labels that can be created in my app is
limitless. Which means I would need to be able to modify the number of
Cases, or get rid of the Case-End Case all together in favor of a
variable appended to the control name: lblLabel name = lblLabel(tag
number).
Is that at all possible?
Stephany's code worked practically out of the box! Thanks!
A few questions, though.
I am not sure what the undescores stand for.
I am also confused (in this case and others) as to how the Me keyword
works. If you could explain it in this case at least, It would get me
on my way to understand other cases. For example, if you could replace
Me with something else, what would it be?
I understand that your code checks all controls to see if they are
labels and if true checks if the tag number matches. It also searches
if each control found has children etc...
If all the labels and checkboxes where on a panel (say Panel1), what
would you have done differently to simpify the code?
This bit of code has made me understand quite a few things. Thanks!
Well, this time it did not work out of the box...
The problem is with the following line.
If _c.Length 0 Then CType(_c(0), Label).Text = String.Empty
If I understand correctly, you declared c as Control Array of which the
first and unique element would be the label we are looking for.
However, when it checks for the c.Lengh, it comes up with 0.
If I take that part out and keep:
CType(_c(0), Label).Text = String.Empty
I get an IndexOutOfRangeException
It does find the label though, I checked that.
It does not seem to populate the array...
Show us the actual code (copy and paste) that you have inside the event
handler, especially the bit that shows how you determine that the label is
actually found.
The code I posted works for me.
"vbnewbie" <bi*****@gmail.comwrote in message
news:11*********************@h40g2000cwb.googlegro ups.com...
>
Well, this time it did not work out of the box...
The problem is with the following line.
If _c.Length 0 Then CType(_c(0), Label).Text = String.Empty
If I understand correctly, you declared c as Control Array of which the
first and unique element would be the label we are looking for.
However, when it checks for the c.Lengh, it comes up with 0.
If I take that part out and keep:
CType(_c(0), Label).Text = String.Empty
I get an IndexOutOfRangeException
It does find the label though, I checked that.
It does not seem to populate the array...
Sorry, my mistake...
I had forgoten to change the string part of label names in your code to
match the one I actually use in my code (" lblLabel" as oposed to
"lblFileLabel").
Tried it, it works.
Thanks a million.
Stephany... you've done it according to the requirements but I have a
suggestion.
Avoid tagging the checkbox with an arbitrary numeric value and simply use
the .Tag property to reference the label that is associated with it. Create
the label first, tag it with a number (if these numbers are needed) then
create the checkbox and assign the label reference as the tag. All done.
Tom
"Stephany Young" <noone@localhostwrote in message
news:uP******************@TK2MSFTNGP02.phx.gbl...
Your event handler will go something like this:
Private Sub DynamicCheckBox_CheckChanged(ByVal sender As Object, ByVal e
As EventArgs)
Dim _tag As Object = CType(sender, Control).Tag
If _tag IsNot Nothing Then
Dim _c As Control = FindControl(Me, GetType(Label), _tag)
If _c IsNot Nothing Then CType(_c, Label).Text = String.Empty
End If
End Sub
Private Function FindControl(ByVal start As Control, ByVal type as Type,
tag As Object) As Control
For Each _c as Control In start.Controls
If _c.GetType() Is type Then
If _c.Tag IsNot Nothing AndAlso _c.Tag = tag Then Return _c
Else
If _c.HasChildren Then
Dim _cc As Control = FindControl(_c, type, tag)
If _cc IsNot Nothing Then Return _cc
End If
End If
Next
Return Nothing
End Function
When you 'dynamically generate' your CheckBox controls, subscribe to the
event handler with something like:
AddHandler chkCancel0.CheckChanged, AddressOf
DynamicCheckBox_CheckChanged
AddHandler chkCancel1.CheckChanged, AddressOf
DynamicCheckBox_CheckChanged
etc. Note that the same handler is used.
Note also that the event handler does not have a Handles clause.
When any one of you dynamic CheckBoxes is clicked, the event handler is
called and sender is a reference to the CheckBox that was clicked. We then
attempt to get a reference to a Label control anywhere on the form that
has a matching Tag property. If we get one then we set it's Text Property
to an empty string.
Let us konw how you get on.
"vbnewbie" <bi*****@gmail.comwrote in message
news:11**********************@n51g2000cwc.googlegr oups.com...
>>I am having problems accessing properties of dynamically generated
objects in VB2005. Can someone please help?
In a nutshell:
My app creates an equal number of checkboxes and labels that share the
same Tag number. (I thought it might help)
The checkboxes name is a concatenation of "chkCancel" and a number that
represents the order in which they were created:
chkCancel0 (Tag = 0)
chkCancel1 (Tag = 1)
chkCancel2 (Tag = 2)
etc...
The same goes for the labels
lblLabel0 (Tag = 0)
lblLabel1 (Tag = 1)
lblLabel2 (Tag = 2)
etc...
When the label is created, its text property is given a value
(lblLabel.text = value).
What I want to do, is clear that text property when I click on the
corresponding checkbox.
I want to do it with a common sub, handler, whatever, that will work
for all checkboxes.
My problem is how to acces the label text property of a dynamically
created label.
Pseudo code:
lableTag = sender.tag
if sender.checked=true then
lblLabel(labelTag).text="" (this is the part I have trouble with)
I don't seem to be able to reference any object created dynamically...
It must be very simple for an experienced programmer, but not to
vbnewbie... and it is driving me nuts!
Thanks
Tom,
Stephany... you've done it according to the requirements but I have a
suggestion.
I think that Stephany :-) can better use a sortedlist (or a hashtable but I
prefer the sortedlist) http://msdn2.microsoft.com/en-us/library/ms132319.aspx
Cor
"Tom Leylan" <tl*****@nospam.netschreef in bericht
news:Oz**************@TK2MSFTNGP03.phx.gbl...
Stephany... you've done it according to the requirements but I have a
suggestion.
Avoid tagging the checkbox with an arbitrary numeric value and simply use
the .Tag property to reference the label that is associated with it.
Create the label first, tag it with a number (if these numbers are needed)
then create the checkbox and assign the label reference as the tag. All
done.
Tom
"Stephany Young" <noone@localhostwrote in message
news:uP******************@TK2MSFTNGP02.phx.gbl...
>Your event handler will go something like this:
Private Sub DynamicCheckBox_CheckChanged(ByVal sender As Object, ByVal e
As EventArgs)
Dim _tag As Object = CType(sender, Control).Tag
If _tag IsNot Nothing Then
Dim _c As Control = FindControl(Me, GetType(Label), _tag)
If _c IsNot Nothing Then CType(_c, Label).Text = String.Empty
End If
End Sub
Private Function FindControl(ByVal start As Control, ByVal type as Type,
tag As Object) As Control
For Each _c as Control In start.Controls
If _c.GetType() Is type Then
If _c.Tag IsNot Nothing AndAlso _c.Tag = tag Then Return _c
Else
If _c.HasChildren Then
Dim _cc As Control = FindControl(_c, type, tag)
If _cc IsNot Nothing Then Return _cc
End If
End If
Next
Return Nothing
End Function
When you 'dynamically generate' your CheckBox controls, subscribe to the
event handler with something like:
AddHandler chkCancel0.CheckChanged, AddressOf
DynamicCheckBox_CheckChanged
AddHandler chkCancel1.CheckChanged, AddressOf
DynamicCheckBox_CheckChanged
etc. Note that the same handler is used.
Note also that the event handler does not have a Handles clause.
When any one of you dynamic CheckBoxes is clicked, the event handler is
called and sender is a reference to the CheckBox that was clicked. We
then attempt to get a reference to a Label control anywhere on the form
that has a matching Tag property. If we get one then we set it's Text
Property to an empty string.
Let us konw how you get on.
"vbnewbie" <bi*****@gmail.comwrote in message
news:11**********************@n51g2000cwc.googleg roups.com...
>>>I am having problems accessing properties of dynamically generated
objects in VB2005. Can someone please help?
In a nutshell:
My app creates an equal number of checkboxes and labels that share the
same Tag number. (I thought it might help)
The checkboxes name is a concatenation of "chkCancel" and a number that
represents the order in which they were created:
chkCancel0 (Tag = 0)
chkCancel1 (Tag = 1)
chkCancel2 (Tag = 2)
etc...
The same goes for the labels
lblLabel0 (Tag = 0)
lblLabel1 (Tag = 1)
lblLabel2 (Tag = 2)
etc...
When the label is created, its text property is given a value
(lblLabel.text = value).
What I want to do, is clear that text property when I click on the
corresponding checkbox.
I want to do it with a common sub, handler, whatever, that will work
for all checkboxes.
My problem is how to acces the label text property of a dynamically
created label.
Pseudo code:
lableTag = sender.tag
if sender.checked=true then
lblLabel(labelTag).text="" (this is the part I have trouble with)
I don't seem to be able to reference any object created dynamically...
It must be very simple for an experienced programmer, but not to
vbnewbie... and it is driving me nuts!
Thanks
Good call Tom!
I had been thinking that a better way to do it would have been to use a
Dictionary(Of String, Label) where the key was the name of the relevant
CheckBox control and the value was the Label control.
But that way it still would have required a 'get' of the item of the
dictionay before you could access the Label control.
Your way, the code inside the event handler simply becomes:
CType(CType(sender, Control).Tag, Label).Text = String.Empty
assuming of course that the only controls that are subscribed to the event
handler are the CheckBox controls of interest and that the Tag property for
all of them contains a reference to the appropriate Label.
Just goes to show how easy it is for any of us to get into a mind-set and to
not think outside the square.
"Tom Leylan" <tl*****@nospam.netwrote in message
news:Oz**************@TK2MSFTNGP03.phx.gbl...
Stephany... you've done it according to the requirements but I have a
suggestion.
Avoid tagging the checkbox with an arbitrary numeric value and simply use
the .Tag property to reference the label that is associated with it.
Create the label first, tag it with a number (if these numbers are needed)
then create the checkbox and assign the label reference as the tag. All
done.
Tom
"Stephany Young" <noone@localhostwrote in message
news:uP******************@TK2MSFTNGP02.phx.gbl...
>Your event handler will go something like this:
Private Sub DynamicCheckBox_CheckChanged(ByVal sender As Object, ByVal e
As EventArgs)
Dim _tag As Object = CType(sender, Control).Tag
If _tag IsNot Nothing Then
Dim _c As Control = FindControl(Me, GetType(Label), _tag)
If _c IsNot Nothing Then CType(_c, Label).Text = String.Empty
End If
End Sub
Private Function FindControl(ByVal start As Control, ByVal type as Type,
tag As Object) As Control
For Each _c as Control In start.Controls
If _c.GetType() Is type Then
If _c.Tag IsNot Nothing AndAlso _c.Tag = tag Then Return _c
Else
If _c.HasChildren Then
Dim _cc As Control = FindControl(_c, type, tag)
If _cc IsNot Nothing Then Return _cc
End If
End If
Next
Return Nothing
End Function
When you 'dynamically generate' your CheckBox controls, subscribe to the
event handler with something like:
AddHandler chkCancel0.CheckChanged, AddressOf
DynamicCheckBox_CheckChanged
AddHandler chkCancel1.CheckChanged, AddressOf
DynamicCheckBox_CheckChanged
etc. Note that the same handler is used.
Note also that the event handler does not have a Handles clause.
When any one of you dynamic CheckBoxes is clicked, the event handler is
called and sender is a reference to the CheckBox that was clicked. We
then attempt to get a reference to a Label control anywhere on the form
that has a matching Tag property. If we get one then we set it's Text
Property to an empty string.
Let us konw how you get on.
"vbnewbie" <bi*****@gmail.comwrote in message
news:11**********************@n51g2000cwc.googleg roups.com...
>>>I am having problems accessing properties of dynamically generated
objects in VB2005. Can someone please help?
In a nutshell:
My app creates an equal number of checkboxes and labels that share the
same Tag number. (I thought it might help)
The checkboxes name is a concatenation of "chkCancel" and a number that
represents the order in which they were created:
chkCancel0 (Tag = 0)
chkCancel1 (Tag = 1)
chkCancel2 (Tag = 2)
etc...
The same goes for the labels
lblLabel0 (Tag = 0)
lblLabel1 (Tag = 1)
lblLabel2 (Tag = 2)
etc...
When the label is created, its text property is given a value
(lblLabel.text = value).
What I want to do, is clear that text property when I click on the
corresponding checkbox.
I want to do it with a common sub, handler, whatever, that will work
for all checkboxes.
My problem is how to acces the label text property of a dynamically
created label.
Pseudo code:
lableTag = sender.tag
if sender.checked=true then
lblLabel(labelTag).text="" (this is the part I have trouble with)
I don't seem to be able to reference any object created dynamically...
It must be very simple for an experienced programmer, but not to
vbnewbie... and it is driving me nuts!
Thanks
Personally I would (probably) go one step further. Considering they are
dynamic I wouldn't create a checkbox with a label but rather generate a
hybrid control that contains a checkbox and a label. That frees up the tag
property and permits me to leverage all the stuff available to a newly
defined class.
Additionally it means we don't walk the controls collection (which may
include non-dynamic checkboxes) trying to recognize the checkboxes we want.
We know we are looking for the hybrid objects. A simple (and separate)
collection of the hybrids makes adding and deleting of the objects easy and
insures we have access to each of them through the collection class.
Rather than writing this in the application:
CType(CType(sender, Control).Tag, Label).Text = String.Empty
one should be able to write:
Control.ClearLabel()
"Stephany Young" <noone@localhostwrote in message
news:%2****************@TK2MSFTNGP06.phx.gbl...
Good call Tom!
I had been thinking that a better way to do it would have been to use a
Dictionary(Of String, Label) where the key was the name of the relevant
CheckBox control and the value was the Label control.
But that way it still would have required a 'get' of the item of the
dictionay before you could access the Label control.
Your way, the code inside the event handler simply becomes:
CType(CType(sender, Control).Tag, Label).Text = String.Empty
assuming of course that the only controls that are subscribed to the event
handler are the CheckBox controls of interest and that the Tag property
for all of them contains a reference to the appropriate Label.
Just goes to show how easy it is for any of us to get into a mind-set and
to not think outside the square.
"Tom Leylan" <tl*****@nospam.netwrote in message
news:Oz**************@TK2MSFTNGP03.phx.gbl...
>Stephany... you've done it according to the requirements but I have a
suggestion.
Avoid tagging the checkbox with an arbitrary numeric value and simply use
the .Tag property to reference the label that is associated with it.
Create the label first, tag it with a number (if these numbers are
needed) then create the checkbox and assign the label reference as the
tag. All done.
Tom
"Stephany Young" <noone@localhostwrote in message
news:uP******************@TK2MSFTNGP02.phx.gbl. ..
>>Your event handler will go something like this:
Private Sub DynamicCheckBox_CheckChanged(ByVal sender As Object, ByVal
e As EventArgs)
Dim _tag As Object = CType(sender, Control).Tag
If _tag IsNot Nothing Then
Dim _c As Control = FindControl(Me, GetType(Label), _tag)
If _c IsNot Nothing Then CType(_c, Label).Text = String.Empty
End If
End Sub
Private Function FindControl(ByVal start As Control, ByVal type as
Type, tag As Object) As Control
For Each _c as Control In start.Controls
If _c.GetType() Is type Then
If _c.Tag IsNot Nothing AndAlso _c.Tag = tag Then Return _c
Else
If _c.HasChildren Then
Dim _cc As Control = FindControl(_c, type, tag)
If _cc IsNot Nothing Then Return _cc
End If
End If
Next
Return Nothing
End Function
When you 'dynamically generate' your CheckBox controls, subscribe to the
event handler with something like:
AddHandler chkCancel0.CheckChanged, AddressOf
DynamicCheckBox_CheckChanged
AddHandler chkCancel1.CheckChanged, AddressOf
DynamicCheckBox_CheckChanged
etc. Note that the same handler is used.
Note also that the event handler does not have a Handles clause.
When any one of you dynamic CheckBoxes is clicked, the event handler is
called and sender is a reference to the CheckBox that was clicked. We
then attempt to get a reference to a Label control anywhere on the form
that has a matching Tag property. If we get one then we set it's Text
Property to an empty string.
Let us konw how you get on.
"vbnewbie" <bi*****@gmail.comwrote in message
news:11**********************@n51g2000cwc.google groups.com...
I am having problems accessing properties of dynamically generated
objects in VB2005. Can someone please help?
In a nutshell:
My app creates an equal number of checkboxes and labels that share the
same Tag number. (I thought it might help)
The checkboxes name is a concatenation of "chkCancel" and a number that
represents the order in which they were created:
chkCancel0 (Tag = 0)
chkCancel1 (Tag = 1)
chkCancel2 (Tag = 2)
etc...
The same goes for the labels
lblLabel0 (Tag = 0)
lblLabel1 (Tag = 1)
lblLabel2 (Tag = 2)
etc...
When the label is created, its text property is given a value
(lblLabel.text = value).
What I want to do, is clear that text property when I click on the
corresponding checkbox.
I want to do it with a common sub, handler, whatever, that will work
for all checkboxes.
My problem is how to acces the label text property of a dynamically
created label.
Pseudo code:
lableTag = sender.tag
if sender.checked=true then
lblLabel(labelTag).text="" (this is the part I have trouble with)
I don't seem to be able to reference any object created dynamically...
It must be very simple for an experienced programmer, but not to
vbnewbie... and it is driving me nuts!
Thanks
This thread has been closed and replies have been disabled. Please start a new discussion. Similar topics
by: alex |
last post by:
I'm new to xslt, and I am attempting to use it to produce a
comma-separated-value file from a large, dynamically-generated data
file formatted in xml (examples of the xml file and my xslt style...
|
by: MrNobody |
last post by:
is there any way I can adjust the behavior of a Label when text overflows
it's boundaries?
I have a specific size Label which can show 2 lines of text, but on some
occassions the text I insert...
|
by: ted benedict |
last post by:
hi everybody, i hope this is the right place to discuss this weird
behaviour. i am getting dynamically generated text or xml from the
server side using xmlhttprequest. if the server side data is...
|
by: ghadley_00 |
last post by:
Hi,
I have a database with a main table and a lookup table of customers,
and reports for each of the customers listing each transaction they
have listed.
I have a form that has buttons for...
|
by: verbatim |
last post by:
with the following page, the dynamically generated fields are not recognized when i try to submit the form, or add more elements.
when i hit my submit button, the address bar has only x1 - x5 in...
|
by: SudhirKamath |
last post by:
I have built a windows form using C#( .NET 2.0 ). The form has a label with text set to “:My label text.” When I build and run the form here everything looks fine.
When a person is running the...
|
by: mylog |
last post by:
Hi all,
I am having a small problem on getting the values of the dynamically generated textboxes in C# windows application. I have successfully read an xml file and put its key and value fields as...
|
by: kpreddy |
last post by:
hello friends,
I am creating a win form where i need to drag and drop a label from panel 1 to panel 2 . as soon as i drop the label in panel 2, label from panel 1 must deleted. and again if i drag...
|
by: karthik25 |
last post by:
Hi,
The following code creates a tab container, 5 tab panels, buttons, labels. I was able to add event handlers to the button. But how am i supposed to access the dynamically created labels? For...
|
by: Charles Arthur |
last post by:
How do i turn on java script on a villaon, callus and itel keypad mobile phone
|
by: emmanuelkatto |
last post by:
Hi All, I am Emmanuel katto from Uganda. I want to ask what challenges you've faced while migrating a website to cloud.
Please let me know.
Thanks!
Emmanuel
|
by: BarryA |
last post by:
What are the essential steps and strategies outlined in the Data Structures and Algorithms (DSA) roadmap for aspiring data scientists? How can individuals effectively utilize this roadmap to progress...
|
by: nemocccc |
last post by:
hello, everyone, I want to develop a software for my android phone for daily needs, any suggestions?
|
by: Sonnysonu |
last post by:
This is the data of csv file
1 2 3
1 2 3
1 2 3
1 2 3
2 3
2 3
3
the lengths should be different i have to store the data by column-wise with in the specific length.
suppose the i have to...
|
by: Hystou |
last post by:
Most computers default to English, but sometimes we require a different language, especially when relocating. Forgot to request a specific language before your computer shipped? No problem! You can...
|
by: Oralloy |
last post by:
Hello folks,
I am unable to find appropriate documentation on the type promotion of bit-fields when using the generalised comparison operator "<=>".
The problem is that using the GNU compilers,...
|
by: agi2029 |
last post by:
Let's talk about the concept of autonomous AI software engineers and no-code agents. These AIs are designed to manage the entire lifecycle of a software development project—planning, coding, testing,...
|
by: isladogs |
last post by:
The next Access Europe User Group meeting will be on Wednesday 1 May 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM).
In this session, we are pleased to welcome a new...
| |
