Dim str As Stringstr = App.Path