テキストファイルを作成できない

Question

これはおそらくあなたの多くが既に何回か見てきた質問ですが、インターネット上で見つけたすべてのソリューションが正しく動作しないので、本当に必死です。

単純な.txtファイルを作成したいと思います。私のコードの気圧：あなたが見ることができるようにボタンが押されたときにテキストがテキストボックスにあった場合に

Public Class Form3 
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 
     If TextBox1.Text = "" Then 
      MessageBox.Show("Your world needs a name") 
     Else 
      Dim file As System.IO.StreamWriter 
      file = My.Computer.FileSystem.OpenTextFileWriter("c:\test.txt", True) 
      file.WriteLine("Here is the first string.") 
      file.Close() 
     End If 
    End Sub 
End Class 

ので、ファイルを作成する必要があります。

プログラムが動作していないか、間違った場所でファイルを検索していますか？ avanceのおかげで！

Answer 1

はこのような何かを使用してもよい

Public Class Form3 
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 
    If TextBox1.Text = "" Then 
     MessageBox.Show("Your world needs a name") 
    Else 
     Dim file As System.IO.StreamWriter 
     file = My.Computer.FileSystem.OpenTextFileWriter(IO.Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments), "test.txt"), True) 
     file.WriteLine("Here is the first string.") 
     file.Close() 
    End If 
End Sub 

Answer 2

このコードを試してみてください。

Public Class Form3 
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 
     If TextBox1.Text = "" Then 
      MessageBox.Show("Your world needs a name") 
     Else 
      Using file As New StreamWriter("c:\test.txt", True) 
       file.WriteLine("Here is the first string.") 
       file.Close() 
      End Using 
     End If 
    End Sub 
End Class