Foxtable(狐表) → 用户栏目 → 专家坐堂 → 窗口行焦点定位


  共有1831人关注过本帖树形打印复制链接

主题：窗口行焦点定位
帅哥哟，离线，有人找我吗？
zhuxinhui
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1995 积分：6338 威望：0 精华：0 注册：2017/11/8 17:37:00 		窗口行焦点定位  发帖心情 Post By：2024/3/9 15:33:00 [只看该作者]

我选择行双击打开窗口，打开的不是双击行的内容窗口，而是固定行的，无论选择哪行双击都是显示固定行的

同时由销售订单生成的销售出库单时，打开的窗口也是显示固定行的，而不是当行生成行的内容
这个焦定怎样处理
 回到顶部
帅哥，在线噢！
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110743 积分：563641 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/3/9 15:58:00 [只看该作者]

什么事件写了什么代码？

 回到顶部
帅哥哟，离线，有人找我吗？
zhuxinhui
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1995 积分：6338 威望：0 精华：0 注册：2017/11/8 17:37:00 		  发帖心情 Post By：2024/3/9 16:14:00 [只看该作者]

由销售订单生成销售出库单，但销售出库单焦点不会移到增加行，或双击行的位置

 回到顶部
帅哥，在线噢！
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110743 积分：563641 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/3/9 16:56:00 [只看该作者]

麻烦回答什么事件写了什么代码？

 回到顶部
帅哥哟，离线，有人找我吗？
zhuxinhui
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1995 积分：6338 威望：0 精华：0 注册：2017/11/8 17:37:00 		  发帖心情 Post By：2024/3/9 17:57:00 [只看该作者]

正常来说双击哪行窗口就打开哪行的内容，为什么会固定显示第一行的

 回到顶部
帅哥哟，离线，有人找我吗？
zhuxinhui
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1995 积分：6338 威望：0 精华：0 注册：2017/11/8 17:37:00 		  发帖心情 Post By：2024/3/11 9:08:00 [只看该作者]

查不出是哪里出了问题
现在只有强制使用
With Tables("销售出库")
    If .Current IsNot Nothing AndAlso .Current.DataRow.RowState = DataRowState.Unchanged Then '如果当前行未曾修改
        .Position = .Rows.Count - 1
    End If
End With


但是我仍然想：在用代码操作哪行时就定位到哪位，打开时就打开哪行
 回到顶部
帅哥，在线噢！
有点蓝
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110743 积分：563641 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/3/11 9:16:00 [只看该作者]

双击行打开窗口的功能，是在什么事件写了什么代码？

 回到顶部
帅哥哟，离线，有人找我吗？
zhuxinhui
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1995 积分：6338 威望：0 精华：0 注册：2017/11/8 17:37:00 		  发帖心情 Post By：2024/3/11 14:18:00 [只看该作者]

引用订单表的明细，生成销售出库单
Dim Cols1() As String = {"货物编码", "货物名称", "规格", "单位", "未完数量", "单价"}
Dim Cols2() As String = {"物料编码", "物料名称", "规格", "单位", "数量", "单价"}

Dim dr2 As DataRow = DataTables("销售出库").AddNew()
For i As Integer = 0 To s.Rows.count - 1 
    Dim dr As DataRow = DataTables("销售出库明细").AddNew()
    For b As Integer = 0 To Cols1.Length - 1
        dr(Cols2(b)) = s.Rows(i)(Cols1(b))
    Next
Next
Forms("销售开单").open()
 回到顶部
帅哥，在线噢！
有点蓝
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110743 积分：563641 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/3/11 14:27:00 [只看该作者]

这是个循环，如果新增了很多行，那么窗口取哪一行？

另外这个代码放在什么事件的？麻烦把这个事件完整代码发上来
 回到顶部
帅哥哟，离线，有人找我吗？
zhuxinhui
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1995 积分：6338 威望：0 精华：0 注册：2017/11/8 17:37:00 		  发帖心情 Post By：2024/3/11 15:34:00 [只看该作者]

按主表销售出库行为标准打开窗口，销售出库明细是子表来的，想随主表变动而变动

 回到顶部
总数 15 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.06641 秒, 4 次数据查询