Vb.net Abilitare pulsanti

lunedì 21 settembre 2009 - 18.49

pico81 Profilo | Newbie

Ho la necessita di abilitare tutti i pulsanti, che di default sono disattivati, che contengono nel nome la parola "Elimina", in tutti i form aperti facendo il login in un altro form.

Utilizzo questo codice:
Private Sub abilita() For Each f As Form In My.Application.OpenForms For Each c As Control In f.Controls If c.Name.Contains("Elimina") Then c.Enabled = True End If Next Next End Sub

Il tutto funziona egregiamente, ma se i pulsanti sono dentro un ToolStrip, un Panel o altro contenitore, non mi vengono abilitati.
Come posso risolvere?

Grazie

alexmed Profilo | Guru

Ciao
devi fare un ciclo anche sui vari contenitori.
Guarda questo link:
http://community.visual-basic.it/lucianob/archive/2006/08/26/17465.aspx

Ciao

alexmed

pico81 Profilo | Newbie

Grazie alexmed, il tuo consiglio mi è stato utilissimo.
Ho risolto creando questa funzione:


Il codice sorgente non è stato renderizzato qui
perchè non c'è sufficiente spazio.
Clicca qui per visualizzarlo in una nuova finestra

Che richiamo cosi:
Il codice sorgente non è stato renderizzato qui
perchè non c'è sufficiente spazio.
Clicca qui per visualizzarlo in una nuova finestra

In pratica passo alla funzione tutti i form aperti e vado ad abilitare tutti i controlli che contengono nel proprietà Name una delle due parole .

Naturalmente si può modificare la funzione per disattivare i controlli cambiando True in False

alexmed Profilo | Guru

>Grazie alexmed, il tuo consiglio mi è stato utilissimo.
Perfetto! Ringraziamo anche Luciano.

Se sei a posto chiudi il post con il tasto accetta.

Ciao

alexmed
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 !
Copyright © dotNetHell.it 2002-2024
Running on Windows Server 2008 R2 Standard, SQL Server 2012 & ASP.NET 3.5