Comment : activer la tabulation entre les formes (Visual Studio)

Mise à jour : Juillet 2008

Les contrôles Line et Shape n'ont pas de propriété TabStop ou TabIndex, mais vous pouvez quand même activer la tabulation en leur sein. Dans l'exemple suivant, le fait d'appuyer simultanément sur les touches CTRL et TABULATION permet de passer d'une forme à l'autre. Si vous appuyez uniquement sur la touche TAB, vous passerez d'un bouton à l'autre.

Remarque :
Il se peut que votre ordinateur affiche des noms ou des emplacements différents pour certains éléments de l'interface utilisateur Visual Studio mentionnés dans les instructions suivantes. L'édition de Visual Studio dont vous disposez et les paramètres que vous utilisez déterminent ces éléments. Pour plus d'informations, consultez Paramètres Visual Studio.

Pour activer le passage d'une forme à l'autre

1. Faites glisser trois contrôles RectangleShape et deux contrôles Button depuis la Boîte à outils sur un formulaire.

2. Dans l'Éditeur de code, ajoutez une instruction Imports ou using au début du module :

   Imports Microsoft.VisualBasic.PowerPacks
   

   using Microsoft.VisualBasic.PowerPacks;
   

3. Ajoutez le code suivant à une procédure événementielle :

   Private Sub Shapes_PreviewKeyDown(ByVal sender As Object, _
    ByVal e As System.Windows.Forms.PreviewKeyDownEventArgs) Handles _
    RectangleShape1.PreviewKeyDown, RectangleShape2.PreviewKeyDown, _
    RectangleShape3.PreviewKeyDown
       Dim sh As Shape
       ' Check for the Control and Tab keys.
       If e.KeyCode = Keys.Tab And e.Modifiers = Keys.Control Then
           ' Find the next shape in the order.
           sh = ShapeContainer1.GetNextShape(sender, True)
           ' Select the next shape.
           ShapeContainer1.SelectNextShape(sender, False, True)
       End If
   End Sub
   

   private void shapes_PreviewKeyDown(Shape sender, System.Windows.Forms.PreviewKeyDownEventArgs e)
   {
       Shape sh;
       // Check for the Control and Tab keys.
       if (e.KeyCode == Keys.Tab && e.Modifiers == Keys.Control)
       // Find the next shape in the order.
       {
           sh = shapeContainer1.GetNextShape(sender, true);
           // Select the next shape.
           shapeContainer1.SelectNextShape(sender, false, true);
       }
   }
   

4. Ajoutez le code suivant à la procédure événementielle Button1_PreviewKeyDown :

   Private Sub Button1_PreviewKeyDown(ByVal sender As Object, _
     ByVal e As System.Windows.Forms.PreviewKeyDownEventArgs) _
     Handles Button1.PreviewKeyDown
       ' Check for the Control and Tab keys.
       If e.KeyCode = Keys.Tab And e.Modifiers = Keys.Control Then
           ' Select the first shape.
           RectangleShape1.Select()
       End If
   End Sub
   

   private void button1_PreviewKeyDown(object sender, System.Windows.Forms.PreviewKeyDownEventArgs e)
   {
       // Check for the Control and Tab keys.
       if (e.KeyCode == Keys.Tab & e.Modifiers == Keys.Control)
       // Select the first shape.
       {
           rectangleShape1.Select();
       }
   }
   

Voir aussi

Tâches

Comment : dessiner des formes avec les contrôles OvalShape et RectangleShape (Visual Studio)

Comment : dessiner des lignes avec le contrôle LineShape (Visual Studio)

Concepts

Introduction aux contrôles Line et Shape (Visual Studio)

Historique des modifications