匿名使用者
匿名使用者 發問時間: 電腦與網際網路程式設計 · 2 0 年前

如何查詢folder的名稱

如何透過vb去檢察資料夾名稱,不是檔案名稱哦

1 個解答

評分
  • 匿名使用者
    2 0 年前
    最佳解答

    這兩個是我自己寫來判斷資料夾及檔案是否存在的小函數

    傳入目錄路徑即會回傳是否存在

    Ex.

    Path = App.Path

    Msgbox IsDirExist(Path)

    '--------------------------------------------------------------

    Function IsDirExist(ByVal sPath As String) As Boolean

    If Len(Dir(sPath, vbDirectory)) > 0 Then

    IsDirExist = True

    Else

    IsDirExist = False

    End If

    End Function

    Function IsFileExist(ByVal sPath As String) As Boolean

    If Len(Dir(sPath)) > 0 Then

    IsFileExist = True

    Else

    IsFileExist = False

    End If

    End Function

還有問題?馬上發問,尋求解答。