主题：利用临时表修改数据问题，代码运行正常，但数据没有改变，不知什么原因，请帮忙分析一下。

Dim dt As DataTable

Dim cmd As New SQLCommand

cmd.CommandText = "Select [_Identify],货品代码,库存数量,单价,完成导入 From {维护LIS库存}"

dt = cmd.ExecuteReader(True)

Dim dt1 As DataTable

Dim cmd1 As New SQLCommand

cmd1.CommandText = "Select [_Identify],物料编码,实物数量,单价 From {物料信息}"

dt1 = cmd1.ExecuteReader(True)

For Each dr As DataRow In dt.DataRows

        dr("完成导入")=True

Next

dt.save

MessageBox.Show("导入完毕!")