Question

急急！！！高分悬赏VB高手请进！

一个SQL数据库，用ADODC，用DataGrid做数据列表，通过点击“添加”在TEXT中输入数据，点击“确定”保存到数据库中。

代码如下：

Private Sub Command3_Click()
If Command3.Caption = "添加" Then
Command3.Caption = "确认"
Command6.Caption = "取消"
Adodc1.Recordset.AddNew
Else
Command3.Caption = "添加"
Adodc1.Recordset.Update
Adodc1.Refresh
End If

End Sub

问题：我想点击“添加”后，在TEXT中保留DataGrid列表中指针所选的数据，现在的情况是代码执行了Adodc1.Recordset.AddNew后，TEXT中的数据全部清空了，我想通过编辑以前的数据而达到录入新数据的要求。我是新手，请高手帮帮忙，很急！！！！！谢谢。QQ：15248286

Answer 1

你使用的是ADODC 控件与Text控件 将Text绑定到Adodc 控件上,如果不绑定呢?
比如
dim rs as new adodb.recordset
rs.open "select * from tab",conn,3,3
me.text1.text=rs(0)

这样你更新数据就不会影响到Text的文本内容,直到下一次调用text1.text=rs(0)

Answer 2

不支持绑定;
...
adodc1.recordset.movelast
adodc1.recordset.addnew
...

Answer 3

因为你绑定了的原故，所以添加后会清空，解决的方法是：马上把数据指针指向刚才那条记录，文本框就会自动有数据了。

（用xx.recordset.find()就很方便找出刚才那条记录）

我觉得楼上说得也对，有时绑定并不好。