Ripulire oggetti

mercoledì 18 maggio 2005 - 12.31

Elenco Threads

Stanze Forum

Aggiungi ai Preferiti

Cerca nel forum

nandonando Profilo | Senior Member

398 messaggi | Data Invio: mer 18 mag 2005 - 12:31

Sono all'interno di un Usercontrol e vorrei ripulire tutti gli oggetti ad esmpio text1.text=""
con una cosa del genere
Controls(i).GetType.Name
Case "TextBox"
Dim i As Int16
Dim txtx As TextBox
Dim ddl As DropDownList
For i = 0 To me.Controls.Count - 1
Try
Select Case Table1.Controls(i).GetType.Name
Case "TextBox"
txtx = me.Controls(i)
txtx.Text = ""
Case "DropDownList"
ddl = me.Controls(i)
ddl.SelectedIndex = 0
End Select
Catch ex As Exception

End Try

Next
ma non funziona per quale motivo?
grazie

Andy Profilo | Senior Member

487 messaggi | Data Invio: mer 18 mag 2005 - 15:07

Ciao, prova in questo modo:

Dim Ctl As Control

For Each Ctl In Me.Controls

Select Case Ctl.GetType.Name.ToString
Case “Button”
…

Case "TextBox"
…

End Select
Next

Torna su

Stanze Forum

Elenco Threads

Partecipa anche tu! Registrati!

Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !