Foxtable(狐表)用户栏目专家坐堂 → [求助]点击复选后 删除多行错误


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

主题:[求助]点击复选后 删除多行错误

帅哥哟,离线,有人找我吗?
blsu33
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2927 积分:20161 威望:0 精华:0 注册:2012/2/3 17:45:00
[求助]点击复选后 删除多行错误  发帖心情 Post By:2019/1/12 17:54:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:beb08791-2d1b-40ac-b50c-b2422625c3e4.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:九尾狐 帖子:2927 积分:20161 威望:0 精华:0 注册:2012/2/3 17:45:00
  发帖心情 Post By:2019/1/12 17:54:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:例子.foxdb


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


加好友 发短信
等级:九尾狐 帖子:2927 积分:20161 威望:0 精华:0 注册:2012/2/3 17:45:00
  发帖心情 Post By:2019/1/12 17:56:00 [只看该作者]

点击窗口的 单选按钮 打开复选  然后 复选多行  然后“”删除“”  会出现 部分 删不掉

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/1/13 22:33:00 [只看该作者]

Dim bxmx As WinForm.Table = e.Form.Controls("tab_bxmx")
If bxmx.Table.Current IsNot Nothing Then
    If MessageBox.Show("是否删除选定多行?","提示",MessageBoxButtons.YesNo,MessageBoxIcon.Question)=DialogResult.Yes Then
        For i As Integer = bxmx.Table.Rows.count-1 To 0 Step-1
            Dim r3 = bxmx.Table.Rows(i)
            If r3("选择")=True Then
                r3.Delete
            End If
        Next
    Else
        Return
    End If
End If

 回到顶部