[VB2] ENTER キーにてディレクトリの移動をする方法

概要

Visual Basic for Windows 2.0 のディレクトリ リスト ボックスはコモン ダイア
ログの [開く] ダイアログ等のディレクトリ リストと違い、[ENTER] キーを押して
もディレクトリの移動が行われません。この資料はコモン ダイアログのディレクト
リ リスト ボックスと同様に [ENTER] キーでディレクトリの移動を行う方法に
ついて記述しています。

サンプル

以下はディレクトリ リスト ボックス Dir1 の例です。

  Sub Dir1_KeyPress (KeyAscii As Integer)
      ' ディレクトリの移動
      If KeyAscii = 13 Then
          Dir1.Path = Dir1.List(Dir1.ListIndex)
      End If
  End Sub