Foxtable(狐表)用户栏目专家坐堂 → 求助


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

主题:求助

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


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

测试没有问题呀,什么步骤测试有问题?

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


加好友 发短信
等级:三尾狐 帖子:603 积分:4090 威望:0 精华:0 注册:2019/11/14 23:06:00
  发帖心情 Post By:2020/6/2 11:03:00 [只看该作者]

会提示,但是依然会写到表里面

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


加好友 发短信
等级:三尾狐 帖子:603 积分:4090 威望:0 精华:0 注册:2019/11/14 23:06:00
  发帖心情 Post By:2020/6/2 11:09:00 [只看该作者]

就是这样
图片点击可在新窗口打开查看此主题相关图片如下:3.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:三尾狐 帖子:603 积分:4090 威望:0 精华:0 注册:2019/11/14 23:06:00
  发帖心情 Post By:2020/6/2 11:21:00 [只看该作者]

找到解决的办法了,
Select Case e.DataCol.name
    Case "SPDM","GG1DM","GG2DM"
        Dim dr As DataRow = e.DataRow
        If dr.IsNull("SPDM") = False AndAlso dr.IsNull("GG1DM") = False AndAlso dr.IsNull("GG2DM") = False Then
            If e.DataTable.Compute("Count([_Identify])","SPDM = '" & dr("SPDM") & "' And GG1DM = '" & dr("GG1DM") & "' And GG2DM ='" & dr("GG2DM") & "' ") > 1 Then
                MessageBox.Show("该商品已挂板","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
                CurrentTable.Current.Delete()
            End If
        End If
End Select

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


加好友 发短信
等级:三尾狐 帖子:603 积分:4090 威望:0 精华:0 注册:2019/11/14 23:06:00
  发帖心情 Post By:2020/6/2 11:22:00 [只看该作者]

谢谢蓝老师

 回到顶部
总数 15 上一页 1 2