当前位置: 源码素材网 » VB教程 » 详情页

VB 获取指定文件所在的目录

  •   时间:2019-10-06
  • 概述:路径 目录

VB6.0 获取指定文件所在的目录,函数名称:GetApp,参数传递:path——文件路径,具体函数代码分享如下:

Public Function GetApp(path As String)
Dim I As Integer
    If path = "" Then Exit Function
    For I = Len(path) To 1 Step -1
        If Mid$(path, I, 1) = "\" Then
            GetApp = Left$(path, I - 1)
            Exit For
        End If
    Next
End Function

本函数会自动添加路径标识符。

    相关声明:

      若“VB 获取指定文件所在的目录”有损您的权益,请告之我们删除内容。
      部分文章来源于网络,版权归原作者所有。