UIHierarchy.SelectUp メソッド

[アーティクル]
08/22/2008

更新 : 2007 年 11 月

現在展開されているツリーで選択されているノードの、1 つ上のノードを選択します。

名前空間 : EnvDTE
アセンブリ : EnvDTE (EnvDTE.dll 内)

構文

'宣言
Sub SelectUp ( _
    How As vsUISelectionType, _
    Count As Integer _
)
'使用
Dim instance As UIHierarchy
Dim How As vsUISelectionType
Dim Count As Integer

instance.SelectUp(How, Count)

void SelectUp(
    vsUISelectionType How,
    int Count
)

void SelectUp(
    [InAttribute] vsUISelectionType How, 
    [InAttribute] int Count
)

function SelectUp(
    How : vsUISelectionType, 
    Count : int
)

パラメータ

How
型 : EnvDTE.vsUISelectionType

必ず指定します。選択方法を示す vsUISelectionType 定数。

Count
型 : System.Int32

必ず指定します。現在のノードから上方向に選択されるノードの数。Count は、記録中にコマンドを結合するためにも使用されます。つまり、Shift キーを押しながら上向きの矢印を 4 回押した場合は、4 コード行分送られるのではなく、Count 値に 4 が設定された 1 行を取得します。

解説

SelectUp は、Shift + クリックによるマクロ記録や、方向キーを使用した上下の移動に便利です。その理由は、SelectUp の動作が、ツリービュー内で方向キーおよび Shift キーを押しながら方向キーを押す動作と同様だからです。

例

Sub SelectUpExample()
   Dim UIH As UIHierarchy = _
     DTE.Windows.Item(Constants.vsWindowKindMacroExplorer).Object
   Dim UIHItem As UIHierarchyItem = UIH.GetItem("Macros\Samples")

   UIHItem.Select(vsUISelectionType.vsUISelectionTypeSetCaret)
   If UIHItem.IsSelected = False Then
      If UIH.UIHierarchyItems.Expanded = True Then
         MsgBox("Node is expanded.")
      Else
         MsgBox("Node is not expanded.")
      End If
   End If
   UIH.SelectDown(vsUISelectionType.vsUISelectionTypeSelect, 2)
   UIH.DoDefaultAction()
   UIH.SelectDown(vsUISelectionType.vsUISelectionTypeSelect, 1)
   UIH.SelectUp(vsUISelectionType.vsUISelectionTypeExtend, 1)
End Sub