office交流網--QQ交流群號

Access培訓群:792054000         Excel免費交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

Access判斷文件是否存在

2017-11-27 14:12:00
tmtony8
原創
3087

在Access中,如何判斷文件是否存在呢?相信這個我們很多地方都能用。

比如獲取文件名做相關的操作,如果獲取不到再做其他的處理。


這里我們自定義了一個判讀文件是否存在的函數

Public Function PathIsExist(sPath As String) As Boolean
   
    If Dir(sPath) = "" Then
        PathIsExist = False
    Else
        PathIsExist = True
    End If
End Function



在窗體里調用函數:

Private Sub Command0_Click()
    PathIsExist (Me.Text1)
    If PathIsExist(Me.Text1) Then
        MsgBox "文件存在"
    Else
        MsgBox "文件不存在"
    End If
End Sub



如果文件存在


如果文件不存在

    分享
    北京十一选五基本走势