2° domanda.

su un form ho 7 optionbutton alla pressione su un optionbutton voglio che il carattere diventi bold, però non riesco ad ottenere l'inverso.
Mi spiego meglio il codice sotto,


Private Sub Opt1_Click(Index As Integer)
If Opt1(Index) = True Then
Opt1(Index).FontBold = True
End If
End Sub

quando selezione un opt il carattere diventa bold quando passo ad un'altro opt dovrebbe diventare normale l'opt precedente e diventare bold quello selezionato.
Scrivi così:
codice:
Private Sub Opt1_Click(Index As Integer)
   If Opt1(Index) = True Then
       Opt1(Index).FontBold = Not Opt1(Index).FontBold
    End If
End Sub
l'evento click viene richiamato solo se l'option button che clikki ha value=False, quindi per farlo tornare normale devi prima cliccare su un altro option che diventerà a sua volta bold. e così via per gli altri.
non so se era questo quello che volevi, cmq vedi se ti va bene.