我有以下代码
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值写入同一文本文件?
答案 0 :(得分:1)
如果我看到这一点,你正在做的就是每次你点击button5在你的文本框(新的TextBox)上创建一个新的实例,肯定只会保存用它生成的最后一个实例。尝试将您的实例添加到集合中,然后迭代它们