Foxtable(狐表)用户栏目专家坐堂 → [求助] 死循环了


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

主题:[求助] 死循环了

美女呀,离线,留言给我吧!
susanhe
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:312 积分:2477 威望:0 精华:0 注册:2018/11/22 20:30:00
[求助] 死循环了  发帖心情 Post By:2020/6/30 20:55:00 [只看该作者]


你好, 这个代码在表属性中的Datacolchanging中, 一下运就会出现死循环了,哪儿出错了,请给看一下,麻烦了。


If e.DataCol.Name = "FPrioritized" Then
    Dim dr As DataRow
    dr = e.DataTable.Find("FPrioritized = '" & e.NewValue & "'")
    If dr IsNot Nothing Then
        If MessageBox.Show("已经重复了,是否要重新修改 ?","提示",MessageBoxButtons.YesNo,MessageBoxIcon.Question) = DialogResult.Yes Then
            e.DataRow("FPrioritized") = True
            dr("FPrioritized") = False
            dr("FNeg") = True
            e.Cancel = True
        End If
        e.DataRow("FPrioritized") = False
        dr("FNeg") = True
    End If
End If

 回到顶部
帅哥哟,离线,有人找我吗?
y2287958
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:4627 积分:33767 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2020/6/30 21:00:00 [只看该作者]

If e.DataCol.Name = "FPrioritized" Then
    Dim dr As DataRow
    dr = e.DataTable.Find("FPrioritized = '" & e.NewValue & "'")
    If dr IsNot Nothing Then
        If MessageBox.Show("已经重复了,是否要重新修改 ?","提示",MessageBoxButtons.YesNo,MessageBoxIcon.Question) = DialogResult.Yes Then
            e.DataRow("FPrioritized") = True
            dr("FPrioritized") = False
            dr("FNeg") = True
            e.Cancel = True
        End If
        e.DataRow("FPrioritized") = False
        dr("FNeg") = True
    End If
End If
反复修改,肯定死循环了

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105473 积分:536350 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/30 21:46:00 [只看该作者]

这代码想干嘛的?

 回到顶部