请求帮助，关于同表操作问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 请求帮助，关于同表操作问题

共有10277人关注过本帖树形打印复制链接主题：请求帮助，关于同表操作问题

狐狸爸爸

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

加好友

发短信

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

Post By：2011/6/30 19:34:00 [显示全部帖子]

传表上来，我帮你设置一下代码。

狐狸爸爸

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

加好友

发短信

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

Post By：2011/7/1 8:47:00 [显示全部帖子]

小组人员表的DataColChanged事件代码改为：

Select Case e.DataCol.Name
    Case "员工ID","原小组ID"
        Dim dr As DataRow = e.DataTable.Find("员工ID = '" & e.DataRow("员工ID") & "' And 小组ID = '" & e.DataRow("小组ID") & "'", "开始日期 Desc")
        If dr IsNot Nothing Then
            e.DataRow("开始日期") = dr("结束时间")
            e.DataRow("开始时间") = dr("结束时间")
        End If
End Select

下一主题 >> << 上一主题

主题：请求帮助，关于同表操作问题