-2 
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

    Dim FILE_NAME As String = "C:\KVRequest.txt"
    Dim aryText(4) As String

    aryText(0) = "TextBox4.Text"
    aryText(1) = "TextBox5.Text"
    aryText(2) = "TextBox6.Text"
    aryText(3) = "TextBox7.Text"
    aryText(4) = "TextBox8.Text"

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

    objWriter.Close()
    MsgBox("Text file created in your C drive, attach this file in an email to someone@gmail.com Please check that all of the details are correct before sending.")

End Sub

我要做的是从文本框（4 5 6 7 8）中获取文本以写入文本文件。我的代码创建了文件，但没有在其中写入文本，谁能给我一个关于如何让它工作的提示？

谢谢！

编辑：另外，当我在这里时，我试图得到它，所以 button_1.enabled 只有在所有文本框都已被编辑时才为真，但如果你能帮助我，我想不出一种实用的方法来做到这一点这个我也很感激！

4

1 回答 1

0

鉴于上面发布的代码，没有将任何内容写入文件的原因是因为您没有告诉它向文件写入任何内容。您需要在您的创建StreamWriter和关闭它的 close 方法之间添加类似的内容：

objWriter.WriteLine(TextBox4.Text)
objWriter.WtiteLine(TextBox5.Text)
etc...

此外，仅启用保存按钮的最简单选项是为每个文本框创建一个Control.TextChanged处理程序（或使用一个 Sub 通过将所有事件添加到一个处理程序方法来为所有文本框执行此操作）和让它做类似的事情：

If TextBox4.Text <> "" And TextBox5.Text <> "" And TextBox6.Text <> "" Then
    Button1.Enabled = True
Else
    Button1.Enabled = False
End If
于 2012-08-07T06:47:48.287 回答