ゴミ箱を起動するには？ (ID:74077)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 Shell関数でも出来そうな気がしますが、 APIでやるとこのようになります。 Private Declare Function ShellExecute Lib "SHELL32" Alias "ShellExecuteA" (ByVal hWnd&, ByVal lpOperation$, ByVal lpFile$, ByVal lpParameters$, ByVal lpDirectory$, ByVal nShowCmd&) As Long Const SW_SHOW = 5 Private Sub Command1_Click() 'エクスプローラーの左側にTreeViewを設置する方法 Call ShellExecute(Me.hWnd, "Open", "EXPLORER.EXE", "/n,/e,c:\recycled", "", SW_SHOW) 'エクスプローラーの左側にTreeViewを設置しない方法 'Call ShellExecute(Me.hWnd, "Open", "EXPLORER.EXE", "C:\recycled", "", SW_SHOW) 'エクスプローラーでCドライブを開く(おまけ) 'Call ShellExecute(Me.hWnd, "Open", "EXPLORER.EXE", "/n,/e,C:\", "Q ", SW_SHOW) End Sub