Access专家课堂周年庆
网站公告
·Access快速平台QQ群号:277422564    ·Access快速开发平台下载地址及教程    ·欢迎添加微信交流账号:AccessoftChu    ·如何快速搜索本站文章|示例|资料    
您的位置: 首页 > 技术文章 > Access数据库-模块/函数/VBA

获取Windows的默认当前路径

时 间:2019-07-11 16:24:13
作 者:易勋   ID:35404  城市:上海
摘 要:如果要获取系统当前的默认路径通过VBA要怎么写?
正 文:

通过CurDir函数即可获取到系统的默认当前路径


返回表示当前路径的 Variant (String)。

语法

CurDir[(驱动器)]

可选_drive_ 参数是指定现有驱动器的字符串表达式 如果未指定驱动器或 drive 是零长度字符串 (""),则 CurDir 返回当前驱动器的路径。 在 Macintosh 上,CurDir 将忽略任何指定的 drive,并且只返回当前驱动器的路径。

示例

此示例使用 CurDir 函数返回当前路径。 在 Macintosh 上,将忽略为 CurDir 提供的 drive 指定。 默认驱动器名称是HD, 而路径名的各个部分由冒号而不是反斜杠分隔。 同样,您可以指定 Macintosh 文件夹而不是 \Windows。

' Assume current path on C drive is "C:\WINDOWS\SYSTEM" (on Microsoft Windows).
' Assume current path on D drive is "D:\EXCEL".
' Assume C is the current drive.
Dim MyPath
MyPath = CurDir    ' Returns "C:\WINDOWS\SYSTEM".
MyPath = CurDir("C")    ' Returns "C:\WINDOWS\SYSTEM".
MyPath = CurDir("D")    ' Returns "D:\EXCEL".


Access软件网QQ交流群 (群号:86789465)       access源码网店

最新评论 查看更多评论(0)

发表评论您的评论将提升作者分享的动力!快来评论一下吧!

用户名:
密 码:
内 容:
 

常见问答

技术分类

相关资源

最新帖子

关于我们 | 服务条款 | 在线投稿 | 友情链接 | 网站统计 | 网站帮助