Togliere la spunta ad un OptionButton all'apertura della maschera

Question

Buongiorno a tutti, ho creato su una maschera degli OptionButton che, ad ogni selezione mi permettono di eseguire varie operazioni.

Desidero( poichè all'apertura della maschera è sempre spuntato il primo OptionButton) che al caricamento della maschera tutti gli OptionButton siano deselezionati per poi decidere io quale spuntare ecc.

Spero di essere stato chiaro.

Ciao Nicola.

Answer 1

Ciao Nicola,

per il ciclo:

---

    Dim ctl as Control

    For Each ctl In Me.Controls

        If ctl.ControlType = acOptionButton Then

            'Fai Qualcosa

        End If

    Next ctl

---

Qui trovi i possibili valori della costante enumerata AcControlType e un esempio esauriente.

Circa la soluzione migliore .... direi che non esiste una soluzione migliore. La soluzione va scelta in base al contesto. Se a te serve semplicemente impostare tutti i controlli OptionButto a 0 in apertura maschera direi che impostando come predefinito a 0 il loro valore possa essere preferibile rispetto a fare un ciclo su tutti i controlli della maschera.

Viceversa il ciclo potrebbe essere giustificato (necessario) nei casi in cui, magari in accoppiata alla proprietà Tag del controllo, ti serve di fare azioni specifiche e condizionate sui controlli stessi.

David

Answer 2

Ciao David in realtà accadeva come tu mi segnali, in apertura maschera il valore si impostava a 1.

David, solo per imparare e  per curiosità, ma volendo impostare un ciclo che in base al tipo di controllo permettesse la spunta o meno degli OptionButton, è possibile farlo?

O meglio, in quale caso è preferibile scegliere la soluzione che ho proposto?  

Grazie ancora, buona giornata.

Answer 3

Ciao Nicola

verifica che il valore predefinito di tutti i controlli "Option" che hai creato sia impostato a 0 e che in apertura maschera non imposti a 1 il valore del controllo che ti risulta selezionato.

David

Answer 4

Ciao Mimmo, grazie innanzitutto per il tuo cortese e puntuale riscontro, Gli OptionButton non fanno parte di un gruppo di opzioni, bensì inseriti uno per uno sulla maschera.

Spero sia stato chiaro.

Ciao Nicola.

Answer 5

Ciao Nicola,

se i pulsanti di opzione sono in un controllo di gruppo di opzioni, reimposta nelle proprietà di quest'ultimo, il valore predefinito a spazi.

Mimmo