Zpětné lomítko v cestě
Funkce:
Function
AddBackslash(Path As String, Optional Char As String = "\") As
String
If
Right$(Path, 1) <> Char
Then AddBackslash = Path & Char
Else
AddBackslash = Path
End If
End Function