标题:这个代码该怎么改?
取消只看楼主
事业男儿
Rank: 2
等 级:论坛游民
帖 子:308
专家分:14
注 册:2007-4-25
结帖率:81.69%
已结贴  问题点数:10 回复次数:0 
这个代码该怎么改?
Private Sub Form_Load()
If Dir("c:\123", vbDirectory) <> "" Then
MsgBox "存在"
 Else
 MsgBox "不存在"
End If
End Sub


上面是检测C盘的123文件是否存在,我想改成检测程序所在文件夹App.Path 的123是否存在,怎么改呢?谢谢
搜索更多相关主题的帖子: 检测 文件夹 
2012-04-27 13:29



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-366615-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 1.602234 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved