Tabulazione tra i pulsanti di opzione in VB6

Question

Ho una forma composta da sei pulsanti di opzione all'interno di un frame che si escludono a vicenda e un pulsante di comando.

Ho già fornito un indice di tabulazione diverso per ciascun pulsante di opzione, ma al momento dell'esecuzione, premendo il tasto di tabulazione, è stato escluso dai pulsanti di opzione.

così come si concentra su un altro pulsante di opzione premendo TAB?

Answer 1

Private Sub Option1_KeyPress(KeyAscii As Integer) 
    If KeyAscii = 9 Then 
     Option2.SetFocus 
    End If 
End Sub 

KeyAscii = 9 è il codice per il tasto Tab. Ma devi farlo per tutti i tuoi pulsanti radio.

Se si aggiungono i tuoi pulsanti di opzione appartenenti allo stesso pulsante di scelta avendo indici 0, 1, 2 si può fare in questo modo:

Private Sub Option1_KeyPress(Index As Integer, KeyAscii As Integer) 
If KeyAscii = 9 Then 
    If Index < Option1.Count - 1 Then 
     Option1(Index + 1).SetFocus 
    Else 
     Option1(0).SetFocus 
    End If 
End If 
End Sub 

Answer 2

Come altri hanno già detto, questo è il comportamento previsto. Se davvero desideri ottenere questo risultato, l'unico modo in cui posso pensare di farlo è posizionare ciascun pulsante di opzione su una casella di immagine separata (BorderStyle = None, TabStop = False). Funzionerà quindi ma non sarà possibile utilizzare i tasti freccia per spostarsi tra i pulsanti di opzione, solo i tab.