关联表的记录定位问题(已成功) - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 关联表的记录定位问题(已成功)

共有9612人关注过本帖树形打印复制链接主题：关联表的记录定位问题(已成功)

sloyy

小大 1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：九尾狐帖子：2193 积分：13914 威望：0 精华：2 注册：2012/2/25 10:59:00

关联表的记录定位问题(已成功) 发帖心情

Post By：2012/4/16 17:55:00 [只看该作者]

图片点击可在新窗口打开查看此主题相关图片如下：qq截图20120416174851.jpg

我做了一个关联表,现在想实现以下功能:单击主表时,关联表光标能定位到 "使用" 打了勾的那一行,如何实现?

[此贴子已经被作者于2012-4-17 0:08:10编辑过]

狐狸爸爸

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：管理员帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2012/4/16 21:23:00 [只看该作者]

在主表的CurrentChanged事件设置代码：

If Tables("父表.子表").Visible then

For i as integer = 0 to Tables("父表.子表" ).Rows.Count -1

Tables("父表.子表").Rows(i)("使用") = True

Tables("父表.子表").Position = i

Exit for

End if

sloyy

小大 3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：九尾狐帖子：2193 积分：13914 威望：0 精华：2 注册：2012/2/25 10:59:00

Post By：2012/4/17 0:01:00 [只看该作者]

狐狸爸爸你的代码有错误,我修改了一下图片点击可在新窗口打开查看

If Tables("父表.子表").Visible then

For i as integer = 0 to Tables("父表.子表" ).Rows.Count -1

If Tables("父表.子表").Rows(i)("使用") = True then

Tables("父表.子表").Position = i

Exit for

End If

End if

2: 在主表的CurrentChanged事件执行不正确,我改到PositionChanged事件执行就成功了.

但是我不知道为啥,什么原因?

主题：关联表的记录定位问题(已成功)