将.txt文件保存为特殊格式

Question

我需要知道如何从我的Visual Basic 2010程序中保存.txt文件并将其保存为特殊格式。

我需要它来保存像"monday:email@email.com" & "4/22/2013:email@email.com".

我将如何做到这一点？

我使用Visual Basic 2010

而且有2个列表框需要被保存得这样。 "listbox1info:listbox2info"。我需要让程序更新ASAP。

如何完成此操作？

我的代码是：

Public Class Form1 
    Dim streamer As IO.StreamReader 

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
     OpenFileDialog1.ShowDialog() 
     ListBox1.Text = OpenFileDialog1.FileName 
    End Sub 

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click 
     streamer = IO.File.OpenText(ListBox1.Text) 
     Dim mystring() As String = streamer.ReadToEnd.Split(vbNewLine) 
     ListBox1.Items.AddRange(mystring) 
    End Sub 

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click 
     OpenFileDialog1.ShowDialog() 
     TextBox2.Text = OpenFileDialog1.FileName 
    End Sub 

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click 
     streamer = IO.File.OpenText(TextBox2.Text) 
     Dim mystring() As String = streamer.ReadToEnd.Split(vbNewLine) 
     ListBox2.Items.AddRange(mystring) 
    End Sub 
End Class 

Answer 1

那是哪里周一和email@email.com从？取决于你想要的，调整变量strFileName accrodingly，说当前日期，当前日期，动态电子邮件地址从数据库拉，等等;否则，这将做

Dim strFileName As String = "" 
Dim strContent As String = "" 

strFileName = "monday:email@email.com" & "4/22/2013:email@email.com" & ".txt" 
strContent = "whatever you want" 

My.Computer.FileSystem.WriteAllText(strFileName, strContent, True)