用vb打開文件夾
1. 用VB打開文件夾
需要調用一個函數
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()
Dim FileName As String
FileName = "C:\1"
ShellExecute Me.hwnd, vbNullString, FileName, vbNullString, vbNullString, 1
End Sub
2. 如何使用VB打開文件夾
Private Sub Command1_Click()
Shell \"cmd.exe /c explorer c:\\test\", vbMinimizedFocus
End Sub
備註:在98下邊要用command.com替代cmd.exe,c;\\test可以用一個變數來替代
具體含義可以參考csdn shell關鍵字
explorer是WINDOWS資源管理器,不想用資源管理器的話,可以使用start命令
具體代碼如下:
shell \"cmd.exe /c start c:\\test\",vbMinimizedFocus
3. vb打開文件夾所有pdf文件
在界面上放置一個按鈕。vb打開文件夾所有pdf文件,可以在界面上放置一個按鈕,在使用 vb 編程,有些時候不得不面對需要一次性讀取文件夾中某一類型的所有文件。
4. vb怎麼打開文件夾
1、點擊對話框下菜單,點擊打開文件對話框。
5. VB中打開文件夾
Private Function OpenPath(strPath As String) As Long
strPath = Chr(34) & Chr(34) & " " & Chr(34) & strPath & Chr(34)
OpenPath = Shell("cmd.exe /c Start " & strPath, vbHide)
End Function
上面是我寫的一個函數,會用吧?
打開路徑:OpenPath "C:\Program Files"
打開文件:OpenPath "D:\123\Excel.xls"
6. 用VB打開文件
Private
Sub
Command1_Click()
Shell
"d:\中文文件夾\loe.exe",
vbNormalFocus
'打開你指定的文件
Timer1.Enabled
=
True
'開始計時
Timer1.Interval
=
60000
End
Sub
Private
Sub
Timer1_Timer()
Command2_Click
End
Sub
Private
Sub
Command2_Click()
MsgBox
"command2被點擊了!"
End
Sub
7. vb 打開文件夾
這個可以打開所在目錄的文件夾
Shell
"explorer.exe
"
&
Chr(34)
&
app.Path
&
Chr(34),
vbNormalFocus
這個可以打開任意路徑的文件夾
Shell
"explorer.exe
"
&
Chr(34)
&
"你要打開的文件夾路徑"
&
Chr(34),
_
vbNormalFocus
8. 如何用vb打開某個文件夾
sub command1_click()
dim mypath
mypath = inputbox("請輸入文件夾的完整路徑")
shell "explorer.exe " & chr(34) & mypath & chr(34) ,vbnormalfocus
end sub
9. vb 打開某一具體的文件夾
shell "cmd.exe /C start" &"D:\Program Files\JJ比賽"
可以打開運行對話框中任何內容
Shell 函數
執行一個可執行文件,返回一個 Variant (Double),如果成功的話,代表這個程序的任務 ID,若不成功,則會返回 0。
語法
Shell(pathname[,windowstyle])
Shell 函數的語法含有下面這些命名參數:
部分 描述
pathname 必要參數。Variant (String),要執行的程序名,以及任何必需的參數或命令行變數,可能還包括目錄或文件夾,以及驅動器。
Windowstyle 可選參數。Variant (Integer),表示在程序運行時窗口的樣式。如果 windowstyle 省略,則程序是以具有焦點的最小化窗口來執行的。
windowstyle 命名參數有以下這些值:
常量 值 描述
vbHide 0 窗口被隱藏,且焦點會移到隱式窗口。
VbNormalFocus 1 窗口具有焦點,且會還原到它原來的大小和位置。
VbMinimizedFocus 2 窗口會以一個具有焦點的圖標來顯示。
VbMaximizedFocus 3 窗口是一個具有焦點的最大化窗口。
VbNormalNoFocus 4 窗口會被還原到最近使用的大小和位置,而當前活動的窗口仍然保持活動。
VbMinimizedNoFocus 6 窗口會以一個圖標來顯示。而當前活動的的窗口仍然保持活動。
說明
如果 Shell 函數成功地執行了所要執行的文件,則它會返回程序的任務 ID。任務 ID 是一個唯一的數值,用來指明正在運行的程序。如果 Shell 函數不能打開命名的程序,則會產生錯誤。
注意 預設情況下,Shell 函數是以非同步方式來執行其它程序的。也就是說,用 Shell 啟動的程序可能還沒有完成執行過程,就已經執行到 Shell 函數之後的語句。
10. VB中打開文件夾
explorer和文件夾地址之間要有空格
Shell "explorer " & Text4.Text, vbNormalFocus