当前位置:首页 » 程序代码 » 正文

VB判断盘符是否存在,以及用VB来判断文件或文件夹是否存在。

VB判断盘符是否存在,以及用VB来判断文件或文件夹是否存在。

用VB来判断盘符是否存在,以及来判断文件或文件夹是否存在都可以用DIR函数来判断。

1.判断F盘是否存在于电脑中的VB代码,在窗体建一个按钮,代码如下
Private Sub Command1_Click()
    If Dir("F:\", vbDirectory) <> "" Then
        MsgBox "此盘符存在。"
    Else
        MsgBox "此盘符不存在!"
    End If
End Sub

2.判断电脑是否存在一个文件夹,文件夹的地址是:C:\aaa\bbb\ 
Private Sub Command1_Click()
    If Dir("C:\aaa\bbb\", vbDirectory) <> "" Then
        MsgBox "这个文件夹存在。"
    Else
        MsgBox "这个文件夹不存在!"
    End If
End Sub

3.判断 C:\aaa\bbb\ 这个文件夹里是否有一个文件名叫 a.txt 的文件,VB源码如下:
Private Sub Command1_Click()
    If Dir("C:\aaa\bbb\a.txt") <> "" Then
        MsgBox "此文件存在。"
    Else
        MsgBox "此文件不存在!"
    End If
End Sub

打赏 支付宝打赏 微信打赏

来源:济亨网

本文链接:http://wb86.com/post/168.html

    << 上一篇 下一篇 >>

    湘公网安备 43011102000514号 - 湘ICP备08100508号