(ByVal CurrentDir As String