Loop through controls to clear

[Joe]

I'm wondering how to loop through controls in VB.NET. I have the code from VB6 ok, but I can't figure out how to do it correctly in .NET. This is an example from my VB6 code that loops through controls in a specific frame on a form and unselects the option buttons. .NET barks at this line of code: thiscontrol.val ue = False

Private Sub UnSelectOpts(By Val passedframeCapt ion As String)
Dim thiscontrol As Control
For Each thiscontrol In Me 'Iterate through each element.
If TypeOf thiscontrol Is OptionButton Then
If thiscontrol.Con tainer = passedframeCapt ion Then
thiscontrol.Val ue = False
end if
end if
Next
End sub

How can I clear the option buttons?

[William Ryan [eMVP]]

Here's one way Private Sub Clear()

Dim opt as New Control

For Each opt in myForm.Controls
If opt.GetType = Forms.TextBox then DirectCast(opt, TextBox).Text =
String.Empty
Next
End Sub

But remember that some controls on the form are containers like Panels and
GroupBoxs.. http://www.knowdotnet.com/articles/thedotnetway.html

You can modify the sub though and call it recursively so you don't have to
worry about calling a seperate sub for each container.
"Joe" <an*******@disc ussions.microso ft.com> wrote in message
news:50******** *************** ***********@mic rosoft.com...

I'm wondering how to loop through controls in VB.NET. I have the code from VB6 ok, but I can't figure out how to do it correctly in .NET. This is an
example from my VB6 code that loops through controls in a specific frame on
a form and unselects the option buttons. .NET barks at this line of code:
thiscontrol.val ue = False
Private Sub UnSelectOpts(By Val passedframeCapt ion As String)
Dim thiscontrol As Control
For Each thiscontrol In Me 'Iterate through each element.
If TypeOf thiscontrol Is OptionButton Then
If thiscontrol.Con tainer = passedframeCapt ion Then
thiscontrol.Val ue = False
end if
end if
Next
End sub

How can I clear the option buttons?

[Lloyd Sheen]

There is no "complete list of" controls in dot.net. You will have to do
this recusively since if your controls are parented by a panel lets say, the
panel would show in the first level. You would then have to iterate through
all controls on the panel and so on.

Lloyd Sheen

"William Ryan [eMVP]" <do********@com cast.nospam.net > wrote in message
news:eD******** ******@TK2MSFTN GP09.phx.gbl...

Here's one way Private Sub Clear()

Dim opt as New Control

For Each opt in myForm.Controls
If opt.GetType = Forms.TextBox then DirectCast(opt, TextBox).Text =
String.Empty
Next
End Sub

But remember that some controls on the form are containers like Panels and
GroupBoxs.. http://www.knowdotnet.com/articles/thedotnetway.html

You can modify the sub though and call it recursively so you don't have to
worry about calling a seperate sub for each container.
"Joe" <an*******@disc ussions.microso ft.com> wrote in message
news:50******** *************** ***********@mic rosoft.com...

I'm wondering how to loop through controls in VB.NET. I have the code

from VB6 ok, but I can't figure out how to do it correctly in .NET. This is an
example from my VB6 code that loops through controls in a specific frame on a form and unselects the option buttons. .NET barks at this line of code:
thiscontrol.val ue = False

Private Sub UnSelectOpts(By Val passedframeCapt ion As String)
Dim thiscontrol As Control
For Each thiscontrol In Me 'Iterate through each element.
If TypeOf thiscontrol Is OptionButton Then
If thiscontrol.Con tainer = passedframeCapt ion Then
thiscontrol.Val ue = False
end if
end if
Next
End sub

How can I clear the option buttons?

[William Ryan [eMVP]]

I agree entirely. If you only have one container you can just walk through
it but in most instances, the recursive method is the way to go. The reason
I mention the containers is b/c I've had a few occassions where I only
wanted perform things on controls with a given container control but this is
not all that common so recursively walking the form is the preferred method
for 'clear all' functionality. My apologies for any ambiguity.
"Lloyd Sheen" <sq************ *******@tostops pamhotmail.com> wrote in message
news:pj******** ************@ne ws04.bloor.is.n et.cable.rogers .com...

There is no "complete list of" controls in dot.net. You will have to do
this recusively since if your controls are parented by a panel lets say, the panel would show in the first level. You would then have to iterate through all controls on the panel and so on.

Lloyd Sheen

"William Ryan [eMVP]" <do********@com cast.nospam.net > wrote in message
news:eD******** ******@TK2MSFTN GP09.phx.gbl...

Here's one way Private Sub Clear()

Dim opt as New Control

For Each opt in myForm.Controls
If opt.GetType = Forms.TextBox then DirectCast(opt, TextBox).Text =
String.Empty
Next
End Sub

But remember that some controls on the form are containers like Panels and GroupBoxs.. http://www.knowdotnet.com/articles/thedotnetway.html

You can modify the sub though and call it recursively so you don't have to worry about calling a seperate sub for each container.
"Joe" <an*******@disc ussions.microso ft.com> wrote in message
news:50******** *************** ***********@mic rosoft.com...

I'm wondering how to loop through controls in VB.NET. I have the code from

VB6 ok, but I can't figure out how to do it correctly in .NET. This is

an example from my VB6 code that loops through controls in a specific frame

on

a form and unselects the option buttons. .NET barks at this line of code: thiscontrol.val ue = False

Private Sub UnSelectOpts(By Val passedframeCapt ion As String)
Dim thiscontrol As Control
For Each thiscontrol In Me 'Iterate through each element.
If TypeOf thiscontrol Is OptionButton Then
If thiscontrol.Con tainer = passedframeCapt ion Then
thiscontrol.Val ue = False
end if
end if
Next
End sub

How can I clear the option buttons?