1180
社区成员
- 主页
懂数据库的都进来
我用adodc连接了一个datagrid，但我发现datagrid_click事件发生时，adodc.Recordset不会变，我现在需要它变化，因为我要用datagrid_click事件来填充几个textbox，实在没办法了，帮帮忙吧
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
pl5th2001 2002-04-16
我自己已经解决了，谢谢各位
wuwutao 2002-04-16
我也很久很久不用绑定了
pandawind 2002-04-16
你可以在Adodc1_MoveComplete中用变量存储记录值，再在datagrid_click中传给TEXTBOX
pandawind 2002-04-16
StrStore是自定义函数，忘记去掉了。
datagrid_click如果使记录移动的话，会调用Adodc1_MoveComplete的。
datagrid_click如果使记录移动的话，会调用Adodc1_MoveComplete的。
abiho 2002-04-16
我也想,UP
pl5th2001 2002-04-16
不行，StrStore未定义，而且我要在datagrid_click里用
Brunhild 2002-04-16
用rowcolchange事件不更好吗？
pandawind 2002-04-16
Private Sub Adodc1_MoveComplete(ByVal adReason As ADODB.EventReasonEnum, ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
If (Not Adodc1.Recordset.EOF) And (Not Adodc1.Recordset.BOF) Then
Text1.Text = StrStore(Adodc1.Recordset.Fields(0), 0)
Text2.Text = StrStore(Adodc1.Recordset.Fields(1), 0)
Text3.Text = StrStore(Adodc1.Recordset.Fields(2), 0)
End If
End Sub
If (Not Adodc1.Recordset.EOF) And (Not Adodc1.Recordset.BOF) Then
Text1.Text = StrStore(Adodc1.Recordset.Fields(0), 0)
Text2.Text = StrStore(Adodc1.Recordset.Fields(1), 0)
Text3.Text = StrStore(Adodc1.Recordset.Fields(2), 0)
End If
End Sub
_1_ 2002-04-16
我进来了 已经不用绑定好久了回答不出来了
