HOW TO：在圖案間啟用定位處理 (Visual Studio)

更新： 2008 年 7 月

Line 和 Shape 控制項沒有 TabStop 或 TabIndex 屬性，但您仍然可以為兩者啟用定位停駐。在下列範例中，同時按下 CTRL 和 TAB 鍵會在形狀間定位停駐，而只按下 TAB 鍵則會在按鈕間定位停駐。

注意事項：
在下列指示的某些 Visual Studio 使用者介面項目中，您的電腦可能會顯示不同的名稱或位置：您所擁有的 Visual Studio 版本和使用的設定決定了這些項目。如需詳細資訊，請參閱Visual Studio 設定。

若要在形狀間啟用定位停駐

1. 從 [工具箱] 將三個 RectangleShape 控制項和兩個 Button 控制項拖曳到表單上。

2. 在 [程式碼編輯器] 中，將 Imports 或 using 陳述式加入至模組的最上方：

   Imports Microsoft.VisualBasic.PowerPacks
   

   using Microsoft.VisualBasic.PowerPacks;
   

3. 在事件程序中，加入下列程式碼：

   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. 在 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();
       }
   }
   

請參閱

工作

HOW TO：使用 OvalShape 和 RectangleShape 控制項繪製圖案 (Visual Studio)

HOW TO：使用 LineShape 控制項繪製線條 (Visual Studio)

概念

Line 和 Shape 控制項簡介 (Visual Studio)

變更記錄

日期	記錄	原因
2008 年 7 月	加入主題。	SP1 功能變更。