weekendor 发表于 2005-6-29 20:27:00

[VBA]在vba中怎样找当前路径？

求教中.....


在vba中怎样找到我当前.dvb文件的路径所在呢？


目的：我是想在.dvb同一目录下读一数据库，但是找不到相关找当前路径的函数方法，烦恼ing...


（在VB中，可以用App.Path知道当前的路径，但是在autocad的vba中好像不能用这个方法。。。　不知有无高招可指教指教）


迫切求救，请教各位大侠！

wyj7485 发表于 2005-6-30 14:31:00

Function GetSupportPath() As String<BR>Dim strFileName<BR>strFileName = VBE.ActiveVBProject.FileName 'VBE.ActiveVBProject.FileName获取.dvb文件的文件名<BR>GetSupportPath = Left$(strFileName, InStrRev(strFileName, "\"))<BR>End Function

weekendor 发表于 2005-6-30 22:03:00

谢谢你的回复！


我试试！　：）

weekendor 发表于 2005-6-30 22:10:00

成功！


感谢求助！　：）

zhenyy_hyz 发表于 2009-6-9 23:04:00

1楼的回复呢，？
页: [1]
查看完整版本: [VBA]在vba中怎样找当前路径？