我在菜单栏增加一个功能“显示”,点击后希望获得所选文件(在ListView1内)的完整路径。
如何能得到?请指点。
谢谢!
如何能得到?请指点。
谢谢!
解决方案 »
- 请教高手们一些程序运行的问题
- vb 相应键盘事件
- 如何读取服务器的时间
- 关于SendMessage的疑惑!!!!!!!!!!!!!!!!
- 请帮我看看这个是什么原因,数据库的问题
- 关于写入一个随机存取文件的问题?(用MSFLEXGRID控件)急!!!
- 还没有解决!
- 请问Epson LQ-1600K打印机选纸张大小问题(连体纸张,有孔的那种打印纸问题)
- 用ado连接access2000,怎样能知道recordset返回了多少条记录?
- 文件咋个打不开哟???你们来看看。。。。。
- 怎样在程序中建立ODBC与Access 或 SQL Server的连接!!
- vba 调用 word函数!!!!!!!!!!!!!!!
可能用过,是什么呀????
解释一下,帮助回忆!!!!
On Error GoTo errHandler
Dim Buffer As String
Dim rtn
Dim DirPath
Dim fExt As String
ListView2.Visible = False
ListView1.Visible = True
mnuSortAZ_Click
Buffer = Space(MAX_PATH)
rtn = GetWindowsDirectory(Buffer, Len(Buffer))
WinPath = Left(Buffer, rtn)
On Error Resume Next
DelTree32 WinPath & "\Temp\Temp1"
MkDir WinPath & "\Temp\Temp1"
cmdUndoDelete.Enabled = False
cmdUndoRename.Enabled = False
On Error GoTo errHandler
fPath = Dir1.path & "\"
Dir1.path = fPath
Call vbGetFileList
Exit Sub
errHandler:
DirPath = DriveLetter & fExt
fPath$ = DirPath
If fPath$ > "" Then vbGetFileList
Dir1.path = fPath
Call vbGetFileList
End Sub
http://www.mvps.org/btmtz/vbexplorer/小弟只是初学VB,楼上给的代码我不知如何运用
我是希望能获得所选文件的绝对路径(如:d:\aaa\bbb\file.txt)
这样就可以对文件进行其他操作