Question

我想将我的数据库值提取到excel ..所以我给出了这样的代码：

 sql = "select * from  tbl_ItemTransfer"
            cmd1 = New SqlCeCommand(sql, cn)
            dr = cmd1.ExecuteReader()

            ListBox1.Items.Add("Extracting " & strfilename)
            ListBox1.Refresh()
            While (dr.Read())

                sw = New StreamWriter(hht_Storage & "\Export\" & strfilename & ".xls", True)
                prcount = 0
                fvalues = ""
                For I = 0 To dr.FieldCount - 1
                    If fvalues = "" Then
                        fvalues = IIf(IsDBNull(dr(I)), "", dr(I))
                        fvalues = Trim(Replace(fvalues, "'", ""))
                    Else
                        fvalues = fvalues & "|"
                        fvalues = fvalues & IIf(IsDBNull(dr(I)), "", dr(I))
                        fvalues = Trim(Replace(fvalues, "'", ""))
                    End If
                Next I

                sw.WriteLine(fvalues)
                prcount = prcount + 1
                sw.Close()
            End While

所以我的所有值都在一列中以“|”分隔。而不是这个我想在每一列显示我的所有价值。我能做到吗？任何帮助都非常明显..

Answer 1

使用string.split方法拆分值。

id将输出放入数组/数据表中以便轻松地分割行。

然后您可以逐行将拆分值写入Excel工作表。

希望这会让你更进一步。

在excel的每一列中显示数据基值

1 个答案: