报告从Visual Basic中的文件生成

Question

我想知道如何根据保存的文本文件生成一个报告到我的PC在某个目录中。

当我点击报告时，它会告诉我：

没有。采购订单:(在文本框中显示值）

没有。采购订单（Site1作为实验室）:(在文本框中显示值）

没有。采购订单（Site2作为标签）:(在文本框中显示值）

没有。采购订单（Site3作为标签）:(在文本框中显示值）

（网站＆＃39;）来自文本文件内部，每个文本文件可能包含不同的网站。

查看我的表单设计，你可能会有一个想法

我的表单设计：

https://prnt.sc/itt1ts

我保存的一个文本文件：

https://prnt.sc/itt1ts

用于将文件保存到路径的代码：

Select Case MsgBox("Do you wish to overwrite?", MsgBoxStyle.YesNo, "Save")
        Case MsgBoxResult.Yes
            Dim filepath As String = IO.Path.Combine("D:\Logs", TextBox13.Text & ".txt")
            Using sw As New StreamWriter(filepath)
                sw.WriteLine(Label13.Text)
                sw.WriteLine(TextBox13.Text)
                sw.WriteLine(Label1.Text)
                sw.WriteLine(TextBox16.Text)
                sw.WriteLine(Label2.Text)
                sw.WriteLine(TextBox2.Text)
                sw.WriteLine(Label3.Text)
                sw.WriteLine(TextBox3.Text)
                sw.WriteLine(Label4.Text)
                sw.WriteLine(TextBox4.Text)
                sw.WriteLine(Label5.Text)
                sw.WriteLine(TextBox5.Text)
                sw.WriteLine(Label7.Text)
                sw.WriteLine(TextBox7.Text)
                sw.WriteLine(Label6.Text)
                sw.WriteLine(TextBox14.Text)
                sw.WriteLine(Label8.Text)
                sw.WriteLine(TextBox15.Text)
                sw.WriteLine(Label9.Text)
                sw.WriteLine(TextBox9.Text)
                sw.WriteLine(Label10.Text)
                sw.WriteLine(TextBox10.Text)
                sw.WriteLine(Label11.Text)
                sw.WriteLine(TextBox11.Text)
                sw.WriteLine(Label12.Text)
                sw.WriteLine(TextBox12.Text)
            End Using
            MessageBox.Show("Over Written")
        Case MsgBoxResult.No

    End Select

在这种情况下，文本框（textbox2.text）=网站

需要检查所有文档中保存的网站并提供总数

这是一个草图：

http://prntscr.com/iu4hoi