VBレスキュー(花ちゃん)の Visual Basic 6.0用掲示板

タイトル： 同じフォルダなら一つだけ開く

投稿日： 2010/03/11(Thu) 11:56

投稿者： こんどう

下のコードを実行すると、いくつも同じフォルダを表示しますが、同じフォルダが開いていれば
表示しない様にしたいのです。
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private Sub Command1_Click()
Call Shell("explorer " & "C:\tmp\", vbNormalFocus)
End Sub

- 関連一覧ツリー （

をクリックするとツリー全体を一括表示します）

同じフォルダなら一つだけ開く

こんどう

No.14539

Re: 同じフォルダなら一つだけ開く - 魔界の仮面弁士 10/03/11-14:16 No.14540
- Re^2: 同じフォルダなら一つだけ開く - スクリプトプログラマ 10/03/11-16:02 No.14541
  - Re^3: 同じフォルダなら一つだけ開く - 花ちゃん 10/03/11-17:01 No.14542

タイトル	：同じフォルダなら一つだけ開く
投稿日	： 2010/03/11(Thu) 11:56
投稿者	：こんどう

古いスレッドにレスはつけられません。