Question

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只有在所有文本框都被编辑的情况下才是真的，但我想不出一个实用的方法来做到这一点，如果可以的话帮助我，我也将非常感激！

Answer 1

鉴于上面发布的代码，没有任何内容写入文件的原因是因为您没有告诉它向文件写入任何内容。你需要在创建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

问题通过Visual Basic创建文本文件（不写文本）

1 个答案: