- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 这段代码有什么问题吗？【ok啦】 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=4396)
-- 发布时间：2009/9/18 20:35:00
-- 这段代码有什么问题吗？【ok啦】
此主题相关图片如下：未命名6.jpg
[此贴子已经被作者于2009-9-20 13:52:02编辑过]
-- 发布时间：2009/9/18 20:46:00
--
估计是FindRow的格式你用得不正确，它正确的格式是：
FindRow(Expression, PositionStart, Wrap)，
估计是后面的两个参数不允许为空吧？
而且，在这儿用Table的FindRow ,好像没有用DataTAble的Find更为方便。
[此贴子已经被作者于2009-9-18 20:47:32编辑过]
-- 发布时间：2009/9/18 20:52:00
--
以下是引用cpayinyuan在2009-9-18 20:46:00的发言：
估计是FindRow的格式你用得不正确，它正确的格式是：
FindRow(Expression, PositionStart, Wrap)，
估计是后面的两个参数不允许为空吧？
那就来个标准格式： 应该是 SQLQuery 的问题吧？此主题相关图片如下：未命名7.jpg
[此贴子已经被作者于2009-9-18 20:56:50编辑过]
-- 发布时间：2009/9/18 20:56:00
--
dim r as row = Tables("职务变动人员基础资料查询转移_table1").Rows(Tables("职务变动人员基础资料查询转移_table1").Position)
试试！
-- 发布时间：2009/9/18 21:04:00
--
以下是引用mr725在2009-9-18 20:52:00的发言：
那就来个标准格式： 应该是 SQLQuery 的问题吧？
此主题相关图片如下：未命名7.jpg
[此贴子已经被作者于2009-9-18 20:56:50编辑过]
格式用错了，3个参数应是独立的3段，不能合并成一个字符串，这样就变成一个参数了。
应改成：Tables("职务变动基础信息").findRow("[姓名]=\'" & r("姓名") & "\'" , 0 , True)
[此贴子已经被作者于2009-9-18 21:08:11编辑过]
-- 发布时间：2009/9/18 21:07:00
--
以下是引用程兴刚在2009-9-18 20:56:00的发言：
dim r as row = Tables("职务变动人员基础资料查询转移_table1").Rows(Tables("职务变动人员基础资料查询转移_table1").Position)
试试！
dim r as row = Tables("职务变动人员基础资料查询转移_table1").Rows(Tables("职务变动人员基础资料查询转移_table1").Position)
试试！
还是提示一样的错误~
另外，程版你的：Tables("职务变动人员基础资料查询转移_table1").Position) t 要 大写 T
[此贴子已经被作者于2009-9-18 21:07:52编辑过]
-- 发布时间：2009/9/18 21:11:00
--
看5楼是否正确。
-- 发布时间：2009/9/18 21:25:00
--
我的理解，这里的Current是DataRow类型，而SQLTable应该没有DataRow类型。
是不是是想达到这种效果吧？
Tables("职务变动基础信息").position = Tables("职务变动人员基础资料查询转移_Table1").position
-- 发布时间：2009/9/18 21:32:00
--
楼主贴这样一段代码让人很难猜究竟想达到什么效果，楼上是猜的（窗口table和主表同步焦点）。
当然如果仅仅是同步，可以直接在PositionChanged事件中设置代码：
Tables("职务变动基础信息").position = e.Table.position
-- 发布时间：2009/9/18 21:40:00
--
以下是引用cpayinyuan在2009-9-18 21:11:00的发言：
看5楼是否正确。
谢谢，Tables("职务变动基础信息").findRow("[姓名]=\'" & r("姓名") & "\'" , 0 , True) 可以了～