[求助]关于窗口中table查询结果问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

在窗体中插入table控件，在打开窗体会列出表table绑定表的数据；

在输入查询条件之后会列出满足条件的列，但双击之后数据确实查询之前；

此主题相关图片如下：飞信截图20160304151628.png

此主题相关图片如下：2.png

在textbox Textchanged查询代码为：

Dim tx As String = e.sender.text

Tables("客户信息管理_Table1").Filter = "[客户名称] Like '*" & tx & "*' or [业务负责人] like '*" & tx & "*'"

表positionchanged 代码：

If e.Table.Rows.Count>0 Then

If Forms("新增客户信息").opened Then

Tables("B_Client").Position= Tables("B_Client").Rows.count-1

Else

Dim dr As DataRow

dr = DataTables("B_Client").Find("[客户编号] = '" & e.Table.current("客户编号") & "'")

If dr IsNot Nothing Then

Dim wz As Integer = Tables("B_Client").FindRow(dr)

If wz >= 0 Then

Tables("B_Client").Position = wz

End If

表doubleclick 代码Forms("客户信息修改").Open

但是在查询结果上双击弹出的窗体带出的数据不是所选择的数据而是之前表数据，
请问应该如何处理；

[此贴子已经被作者于2016/3/4 15:25:15编辑过]

你这个录入窗口的控件，应该绑定表客户信息管理_Table1

[此贴子已经被作者于2016/3/4 15:25:45编辑过]

在Table中curretchange设置如下：

Dim dr As DataRow = e.Table.Current.DataRow

Dim wz As Integer = Tables("B_Client").FindRow(dr)

If wz >=0 Then

Tables("B_Client").Position = wz

End If

还是发生以下的错误，Table是作为B_Client的附表来的

.NET Framework 版本：2.0.50727.5472

Foxtable 版本：2015.12.22.1

错误所在事件：B_Client,CurrentChanged

详细错误信息：

未将对象引用设置到对象的实例。

[此贴子已经被作者于2016/3/4 19:12:41编辑过]

Dim dr As Row = e.Table.Current

If dr IsNot Nothing Then

Dim wz As Integer = Tables("B_Client").FindRow(dr.DataRow)

If wz >=0 Then

Tables("B_Client").Position = wz

End If

主题：[求助]关于窗口中table查询结果问题