0

我有以下代码

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 两次，test2.txt 仅包含来自第二个文本框而不是第一个文本框的 .Text 值

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

4

1 回答 1

1

如果我看到这一点，您正在做的就是每次单击 button5 在您的文本框（新文本框）上创建一个新实例，该实例肯定只会保存用它生成的最后一个实例。尝试将您的实例添加到集合中，然后遍历它们

于 2012-09-30T09:53:08.483 回答