Question

VB Adodc用Addnew向SQL数据库添加数据总是覆盖第一行在最后一行出现一组空数据

程序如下：
Private Sub Command1_Click()
Adodc1.Refresh
Adodc1.Recordset.AddNew
Adodc1.Recordset.Fields("A相电压(V)") = Text3(0).Text
Adodc1.Recordset.Fields("B相电压(V)") = Text3(1).Text
Adodc1.Recordset.Fields("C相电压(V)") = Text3(2).Text
Adodc1.Recordset.Fields("A相电流(A)") = Text3(3).Text
Adodc1.Recordset.Fields("B相电流(A)") = Text3(4).Text
Adodc1.Recordset.Fields("C相电流(A)") = Text3(5).Text
Adodc1.Recordset.Update
Adodc1.Refresh
End Sub
已经不覆盖首行了，但是在末行添加的数据是空白（不是NULL），跪求解决

Answer 1

Private Sub Command1_Click() '添加

Adodc1.Recordset.AddNew

end sub
Private Sub Command2_Click() '更新
Adodc1.Recordset.Fields("A相电压(V)") = Text3(0).Text
Adodc1.Recordset.Fields("B相电压(V)") = Text3(1).Text
Adodc1.Recordset.Fields("C相电压(V)") = Text3(2).Text
Adodc1.Recordset.Fields("A相电流(A)") = Text3(3).Text
Adodc1.Recordset.Fields("B相电流(A)") = Text3(4).Text
Adodc1.Recordset.Fields("C相电流(A)") = Text3(5).Text
adodc1.recordset.update
end sub
这样就行了。不要加adodc1.refresh这个了，因为数据是先写到内存，然后写到数据库的，这个过程需要时间，你写进去也看不到效果。
分步进行，先addnew，给内存空间，然后写入数据。然后update。

Answer 2

1.首先检查是否字段类型不匹配造成的，
2.这个过程中断调试一句句读过去，看是否赋到值
3.尝试使用ado对象，不要使用adodc控件