On 06/04/06, Emanuele <[EMAIL PROTECTED]> wrote: > > Ciao, > > Visto che tutti i cambiamenti di stato lanciano la stessa funzione > > subManageCheckBoxStateChange( ... ) > > Sono convinto che esiste un metodo piu' intelligente per gestire la > cosa, > > solo che non so quale sia :-) > > > > Credo che tu possa provare qualcosa di questo tipo: > > Sub subCheckBoxStateChanged(oEvent as object) > Dim oForm As Object > Dim oChkBox As Object > > N = right(oEvent.source.model.name,1) > > subManageCheckBoxStateChange( N, oEvent.source.state ) > End Sub > > ed assegnare la sub (sempre la stessa, senza necessità di duplicarla) a > tutti i tuoi checkbox, dovrebbe fare quello che vuoi. > Il limite sta nel fatto che per come l'ho scritta, N è sempre di una > sola cifra, se hai valori di N > 10, dovrai elaborare qualcosa di un po' > più elegante per ricavarli. > > Dimenticavo, non so se subManageCheckBoxStateChange si accontenta di > ricevere per N una stringa o meno. > In caso voglia un numero potrai sempre usare cInt(N) o cLng(N) quando la > chiami. > > Ciao! > Emanuele. > > --------------------------------------------------------------------- > To unsubscribe, e-mail: [EMAIL PROTECTED] > For additional commands, e-mail: [EMAIL PROTECTED] > > Grazie mille!!
Ora lo provo subito! avevo pensato a provare a catturare l'evento mouse click ma mi ero trovato nella stessa situazione che ogni checkbox aveva bisogno di un listener. A questo punto potrei chiederti che roba e' questo event, ma poiche' l'ho gia' fatto un po' di tempo fa quando discutevamo la cattura dell'evento doppio click ti risparmio (e continuo a rimanere nell'ignoranza :) ) Vado a studiare cosa contiene oEvent! Ciao e grazie ancora, Michele
