主题：[求助]

Dim Cols1() As String = {"单号", "品号", "品名", "数量", "单价", "金额", "下单日期", "交货日期", "迟交", "短交"}
Dim Cols2() As String = {"单号", "品号", "品名", "数量", "单价", "金额", "下单日期", "交货日期", "迟交", "短交"}
For Each tb As DataRow In ds.Tables("采购明细").Rows
    Dim s1 As String = ""
    Dim s2 As String = ""
    For i As Integer = 0 To Cols2.Length - 1
        s1 &= cols1(0) & ","
        s2 &= "'" & tb(cols2(0)) & "',"
    Next
    com = New SqlClient.SqlCommand("insert into 采购明细(" & s1.trim(",") & ") values (" & s2.trim(",") & ")", cn)    
    com.ExecuteNonQuery()   
Next

什么不一样？出什么错？msgbox看一下sql是什么内容