VBCoding Библиотека кодов Visual Basic 6 Файловая система Добавить слэш в конце пути к папке

Visual Basic 6
Добавить слэш в конце пути к папке
Данная функция проверяет, кончается ли указанный путь слэшом, если нет - добавляет его.

Public Function AddBackSlash(ByVal Path$)
If Right(Path, 1) <> "\" Then Path = Path & "\"
AddBackSlash = Path
End Function
 

Добавить комментарий


Защитный код
Обновить

 
VBCoding Библиотека кодов Visual Basic 6 Файловая система Добавить слэш в конце пути к папке  
Powered by Exponenta -