じょにー様

謎ですね

Dim DataPath As String = System.Environment.GetFolderPath(Environment.SpecialFolder.Personal)

では、エラーにはならんです

どんなエラーが出るのでしょうか？