Newsgroup: it.comp.lang.visual-basic
Titolo: una dritta....

...per scrivere del semplice codice che faccia questo: abilitare oppure
disabilitare
i controlli di una maschera in base a quello che uno ha inserito nei
controlli precedenti, sempre
sulla stessa maskera.
Ad es. se opto per 1 radiobutton "no", mi disabilita la textbox successiva,
altrimenti , l'abilita
per scriverci dentro.
Grazie e ciao.

 ha scritto nel messaggio
news:h%2U8.24400$Jj7.6...@news1.tin.it...

mmmmm... allora...mmm....dunque...mmmm....apč...mmmmm....allora.....cioč
non so come dire...
penso che ci stia un bel ma parla come mangi....
Da quello che ho capito io, anzi meglio, immagnato, penso che tu voglia
sapere, avendo in un form ad esempio un radiobutton, come disabilitare un
textbox?
Se intendevi altro spiegati meglio per favore.
Nel tal caso č qualcosa di inimmaginabilmente semplice.
Private Sub Option1_Click()
If Option1.Value = True Then
    Text1.Enabled = True
    Else
    Text1.Enabled = False
End If
End Sub
Ti consiglio perň di studiarti un'attimo le matrici di controlli, potrebbero
esserti utili.
Ciao

 esserti utili.
Non mancherò.

 Ad es. se opto per 1 radiobutton "no", mi disabilita la textbox
successiva,
Allora Enzo. Mettiamo di avere due "bottoni option" uno di nome optSi e
l'altro optNo. Allora, se non ho capito male, tu vorresti che al selezionare
il NO, implichi la disabilitazione di una casella di testo (TEXT1 nel mio
caso). Dunque una soluzione possibile è questa:
Private Sub optNo_Click()
If optNo.Value = True Then         'se è selezionato il no
    Text1.Enabled = False               'disabilita la text1
End If
End Sub
Private Sub optSi_Click()
Text1.Enabled = True                     'riabilita la text1
End Sub
Da notare come inserisco il codice che riabilita la text1.
Tale codice (Text1.Enabled = True) è necessario perché, mettiamo il caso che
una persona clicchi sul no, la optNo_Click() disabiliterebbe la text1... ma
se poi si rendesse conto di aver sbagliato e di voler selezionare l'opt
sì...??? Allora entra in funzione il Text1.Enabled = True che riabilita la
text1 se si riseleziona l'opzione sì.
Ho letto or ora, che si trattava di un radiobutton anziché di un option
button, ma il discorso è comunque analogo :o)))
Lo riscrivo per completezza:
Private Sub radioNo_Click()
If optNo.Value = 1 Then         'se è selezionato il no
    Text1.Enabled = False               'disabilita la text1
End If
End Sub
Private Sub radioSi_Click()
Text1.Enabled = True                     'riabilita la text1
End Sub
Regards,
Antonio Cangiano
--
"I grandi spiriti hanno sempre incontrato violenta
opposizione da parte delle menti mediocri."
A.Einstein

Private Sub Option1_Click()
    Text1.Enabled=Option1.Value
end sub


Se hai parecchi controlli da abilitare o disabilitare puoi inserirli in 
uno o piu' frame. Quando ti serve abiliti o disabiliti il frame ed 
automaticamente anche i controlli contenuti diventano accessibili o 
inaccessibili.
Il metodo da usare e' del tutto simile a quello suggerito negli altri 
post del thread ...
ciao
		maxx

Grazie delle super dritte!
Ma un neofita come me deve aggiungere per forza una domanda: la routine che
mi avete scritto, nel codice,
va messa prima dei controlli ?
O devo inserirli dentro essa ?
Sto andando a tentativi!!!!
ciao.

> va messa prima dei controlli ?
Clicca due volte sul radiobutton NO  e scrivi dentro alla routine di click
(quella che ti viene fuori in automatico):
If optNo.Value = 1 Then         'se č selezionato il no
    Text1.Enabled = False               'disabilita la text1
End If
Clicca due volte sul radiobutton Sě e scrivi dentro alla routine di click
(quella che ti viene fuori in automatico):
Text1.Enabled = True                     'riabilita la text1
Eventualmente, senza saper ne' leggere ne' scrivere, puoi collocare nel tuo
form i due radio chiamandoli optSě e optNo
e copiare nella finestra del codice tutto quanto scritto nel mio post
precedente.
Regards,
Antonio
