从文本框控件的多个实例将文本写入文件

时间:2012-09-28 10:46:19

标签: vb.net visual-studio-2010 text textbox text-files

我有以下代码

Private Sub Button5_Click(sender As System.Object, e As System.EventArgs) Handles Button5.Click
                textbox = New TextBox

                textbox.Size = New Size(50, 50)
                If Controls.Count > 0 Then
                    TextBox.Top = Controls(Controls.Count - 1).Bottom

                End If

                Me.SplitContainer2.Panel1.Controls.Add(textbox)
 End Sub

这样做是一个接一个地添加文本框的实例。

下一个将文本文件写入我的系统。

Private Sub Button6_Click_1(sender As System.Object, e As System.EventArgs) Handles Button6.Click
        Dim FILE_NAME As String = "C:\Users\Pantheo\test2.txt"

        If File.Exists(FILE_NAME) = True Then

            Dim objWriter As New System.IO.StreamWriter(FILE_NAME)

            objWriter.Write(textbox.Text)
            objWriter.Close()
            MsgBox("Text written to file")

        Else

            MsgBox("File Does Not Exist")

        End If
    End Sub

但是它只写入最后一个控件的值。 例如,如果我创建了2个文本框,通过单击Button5的2次,test2.txt只包含来自第二个文本框的.Text值而不是第一个

有没有办法将每个文本框中的.Text值写入同一文本文件?

1 个答案:

答案 0 :(得分:1)

如果我看到这一点,你正在做的就是每次你点击button5在你的文本框(新的TextBox)上创建一个新的实例,肯定只会保存用它生成的最后一个实例。尝试将您的实例添加到集合中,然后迭代它们