‘文件路径:D:\Uploads\2022\1\2\056(de652330-9c1e-410e-bdfd-19711e9c25b6).doc ‘获取名称:056(de652330-9c1e-410e-bdfd-19711e9c25b6).doc ‘获取:056 Dim filePath As String = “D:\Uploads\2022\1\2\056(de652330-9c1e-410e-bdfd-19711e9c25b6).doc” ‘获取名称 Dim fileName As String = Split(filePath , "\")(UBound(Split(filePath , "\"))) ‘获取056 Dim Num As String = Split(fileName, "(")(0).ToString()
寻寻觅觅转流年,磕磕碰碰道缘浅。
揽几缕、轻挽起,暮暮朝朝与君语。