Как открыть папку Appdata/Roaming - VB

Формулировка задачи:

                    Листинг программы
                
If nasDirExists("C:\Users\111\AppData\Roaming\Папка\") Then
  MsgBox "бла бла бла", vbInformation
 Else
  MkDir "C:\Users\111\AppData\Roaming\Папка\"
 End If
End Sub

Мне нужно чтобы в первой и четвёртой строчке был такой путь, который сам определит имя пользователя (так как сейчас он 111, а на другом компьютере эта программа работать не будет, так как там другое имя пользователя). Я слышал вот про это, но как этим пользоваться?

                    Листинг программы
                
Environ("Appdata")

Решение задачи: «Как открыть папку Appdata/Roaming»

textual
                            Листинг программы 
                        
Environ("Appdata") & "\Папка"

Оцени полезность:

15 голосов , оценка 3.8 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Похожие ответы