蓝老师好!

表“股票日线”是sql外部数据共1200万行，在“日线预测_table1”表中只需找到当前股票“name”的一年的数据，不到300行。用时要几分钟。

我利用SQLFind查找数据后，再写入表。写入、行保存或保存表的过程都很慢，是不是代码的原因？

Dim name As String = e.Form.Controls("CheckedComboBox1").text    ’选择取数的代码

For Each dr As DataRow In DataTables("日线预测").DataRows
    Dim dr1 As DataRow = Tables("股票日线").DataTable.SQLFind("代码 = \'" & name & "\'  And 日期 = \'" & dr("日期") & "\'" )
    If dr1 IsNot Nothing Then
        dr("实际日线") = dr1("涨跌幅")
        dr.Save()
    End If
Next

\'Tables("日线预测_table1").DataTable.save()