1. vb 選擇文件 獲取文件路徑
首先在窗體中放置
Microsoft
Common
Dialog
Control，名稱指定為
cdlg1。
然後放一個按鈕，內代碼如容下：
Private
Sub
Command1_Click()
Dim
fname
As
String
Dim
content
As
String
cdlg1.ShowOpen
fname
=
cdlg1.FileName
MsgBox
fname
Open
fname
For
Input
As
#1
Input
#1,
content
MsgBox
content
Close
#1
End
Sub
2. vb 查找文件路徑
你是要完成以下哪種工作？
1、在本地磁碟中搜索QQ.EXE;
2、查找當前正在運行的QQ.EXE的路徑。
對應1的回答：
使用循環+Dir函數
對應2的回答：
使用以下API:
openprocess,enumprocessmoles,getmolefilenameexa,closehandle,findwindow,getwindowthreadprocessid
具體用法去查網路，到處都是
3. vb 如何通過一個文件的全路徑獲得該文件所在文件夾
'編寫函數，獲取
PrivateFunctionGetLuJIn(ByValaAsString)AsString
DimiAsLong
Fori=Len(a)To1Step-1
Ifmid(a,i,1)=""Then'獲取最後一個""位置
GetLuJin=Left(a,i-1)'函數返回最後一個""前面的東西
ExitFunction'獲取之後，函數沒專什麼事了，退出屬
Endif
Nexti
EndFunction