vb.net - 根据 Grid Cell QTY 将 DataGridView 写入 TextFile Duplicate Lines

Question

我有一个基于 DataGridView 的内容生成文本文件的例程。

情况是这样的。销售订单行 [项目名称[ [数量]

解决方案是为每个数量生成一个文本文件。目前我的例程只为每个订单行生成一行，而不是每个数量。

例如，如果它的当前行，第 6 列。

Try

        Dim StrExport As String = ""

        For Each C As DataGridViewColumn In DataGridView1.Columns
            StrExport &= "" & C.HeaderText & ","
        Next
        StrExport = StrExport.Substring(0, StrExport.Length - 1)
        StrExport &= Environment.NewLine

        For Each R As DataGridViewRow In DataGridView1.Rows
            For Each C As DataGridViewCell In R.Cells
                If Not C.Value Is Nothing Then
                    StrExport &= "" & C.Value.ToString & ","
                Else
                    StrExport &= "" & "" & ","
                End If
            Next
            StrExport = StrExport.Substring(0, StrExport.Length - 1)
            StrExport &= Environment.NewLine
        Next

        Dim tw As IO.TextWriter = New IO.StreamWriter(SaveFileDialog1.FileName)
        tw.Write(StrExport)
        tw.Close()
        My.Computer.FileSystem.RenameFile(SaveFileDialog1.FileName, "FRLSTicket.txt")
    Catch ex As Exception
        MsgBox(ex.Message)
    End Try

    Try
        DataGridView1.Refresh()

    Catch ex As Exception

    End Try

样本行可能是

SalesID,QTY,CustomerName,ItemID,Name,LegColor

SO1234567,3,John Smith ,椅子,舒适的蓝色椅子,胡桃木

标签： vb.net