Vb.net Dim rec=新的SqlDataRecord（tvpDataType） 'smallName只是文件名 rec.SetSqlString（0，smallName） rec.SetSqlString（1，kwd.ToLower（CultureInfo.InvariantCulture）） tvpData.Add（rec） 下一个 sqlParam=新的SqlParameter（“@Data”，SqlDbType.Structured） sqlParam.TypeName=“filename\u关键字\u tbltype” sqlParam.Value=tvpData sqlcmd.Parameters.Add（sqlParam） sqlConn.Open（） sqlcmd.ExecuteNonQuery（） sqlConn.Close（）

请注意，所有数据都是一次性发送的，无论是一条记录还是一千条记录

---

参考资料：

您确定并行插入速度会更快吗？这是一个简单的例子，用于解决未来更复杂的问题。这更像是一个测试用例，可以使用表值参数在一个命令中传递整个数据集，例如，请参阅中的“通过表值参数加载数据”一节。如果你这样做了，你可以把你最后做的事情写下来作为你问题的答案。你确定并行插入会更快吗？这是一个简单的例子，说明了未来更复杂的问题。这更像是一个测试用例，可以使用表值参数在一个命令中传递整个数据集，例如，请参阅中的“通过表值参数加载数据”一节。如果你这样做了，你可以写下你最终做了什么作为你问题的答案。

    Dim employees As New List(Of Employee)()
    For Each element As String In ids
        Dim emp As New Employee(element)
        employees.Add(emp)
    Next

    For Each emp In employees
        emp.AddToDatabase()
    Next

Parallel.ForEach(employees, Sub(emp) emp.AddToDatabase())