office交流網--QQ交流群號

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

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

Access判斷文件是否存在

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

在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



如果文件存在


如果文件不存在

    分享