Foxtable(狐表)用户栏目专家坐堂 → [求助]帮助文件中的实例“独占式编辑之一”,有一个不完善的地方:


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

主题:[求助]帮助文件中的实例“独占式编辑之一”,有一个不完善的地方:

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110744 积分:563646 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/2/23 20:54:00 [显示全部帖子]

用户B如果没有刷新数据,怎么看得到其它用户新增的数据?又如何编辑呢?所以不可能出现冲突啊

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110744 积分:563646 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/2/23 23:02:00 [显示全部帖子]

“可保存”什么情况下为true?结果不成功指什么,"可保存"为false还是可以保存?

建议在选择不同行数据的时候重新加载一下这行数据
BeforeSelChange事件
If e.OldRange.RowSel <> e.NewRange.RowSel '如果选择的是不同的行
    If e.OldRange.RowSel >= 0 AndAlso e.OldRange.Rowsel < e.Table.Rows.Count Then '而且原来选择的是一个有效的数据行
        Dim r As Row = e.Table.Rows(e.NewRange.Rowsel) '获得新选择的行
        If r.DataRow.RowState = DataRowState.Unchanged Then '如果这行还没有改
            r.DataRow.Load ‘重新加载这行
        End If 
    End If
End If

或者在StartEdit事件,开始编辑前加载器其它单元格的数据
If e.Row.DataRow.RowState = DataRowState.Unchanged Then
    e.Row.DataRow.Load
End If

 回到顶部