簡體   English   中英

如何將多個文本框字段保存到VB.Net中的.txt文件

[英]How do I save multiple Textbox fields to a .txt file in VB.Net

因此,我在VB.Net Windows窗體應用程序中有四個文本框字段,輸入數據后,我希望將數據項另存為.txt文件,並將文件名作為第二個文本框的數據輸入。

到目前為止,我的代碼如下所示:

Private Sub btnSubmit_Click(sender As Object, e As EventArgs) Handles btnSubmit.Click

    If txtName.Text And txt_sID.Text = "" Then
        MsgBox("Please complete ALL fields before submitting!")
    End If
    **My.Computer.FileSystem.WriteAllText(file:=txt_sID.Text, txtName.Text, txt_sID.Text, txtScore.Text, txtQuiz.Text, False)**
End Sub

使用加星標的代碼時,該線程將重點放在上下文中,其余代碼將用於上下文。

提前致謝

Dim sb As StringBuilder = New StringBuilder()

sb.Append(txt1.text)
sb.Append(txt2.text)
sb.Append(txt3.text)
sb.Append(txt4.text)

System.IO.File.WriteAllText(FilePath, sb.ToString())

以下是概念性的,因為我使用了標准文本框名稱。

If Not String.IsNullOrWhiteSpace(TextBox1.Text) AndAlso Not String.IsNullOrWhiteSpace(TextBox2.Text) Then
    If Not String.IsNullOrWhiteSpace(TextBox3.Text) Then
        If IO.Directory.Exists(IO.Path.GetDirectoryName(TextBox3.Text)) Then
            Dim sb As New System.Text.StringBuilder
            sb.AppendLine(TextBox1.Text)
            sb.AppendLine(TextBox2.Text)
            IO.File.WriteAllText(TextBox3.Text, sb.ToString)
        End If
    Else
        MessageBox.Show("Please provide a file name")
    End If
Else
    MessageBox.Show("Please complete all fields")
End If

暫無
暫無

聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.

 
粵ICP備18138465號  © 2020-2024 STACKOOM.COM