表格删除为什么只能单独删除一行 选2行也只能删除一行

winsun

1. 功能 按钮_删除账号_点击()
   
2.     变量 a,b,i
   
3.     表格.大小("表格0",a, b)
   
4.     调试输出("行" & a)
   
5.     调试输出("列" & b)
   
6.     遍历(i = 1 ; i < a; i++)
   
7.         如果(表格.获得复选框状态("表格0", i, 0))
   
8.             表格.删除行("表格0", i)
   
9.             表格.插入行("表格0","", -1)
   
10.             i= i-1
    
11.         如果结束
    
12.     遍历结束
    
13. 功能结束

复制代码

问题已经解决 这是修改后的代码 删除后 末尾还可以增加一行多下大神指导

秋来潮汐

比如你要删除第1、2行，i==1时程序会删掉第一行，然后i++后i==2要去删除第2行

但是你删除了第一行后，后面的行数会前移：第2行变第1行，第3行变变第2行，这时i==2实际去判断的是第3行（第3行前移变成了第2行）

前移的第3行没有选中，所以会出现只删除一半的情况

如果问题解决了，请采纳

秋来潮汐

功能 按钮_删除账号_点击()
    变量 a,b,i
    表格.大小("表格0",a, b)
    traceprint("行" & a)
    traceprint("列" & b)
    遍历(i=1;i<a;i++)
        如果(表格.获得复选框状态("表格0",i,0))
            表格.删除行("表格0",i)
            //表格.插入行("表格0","",-1)
            i= i-1
        如果结束
    遍历结束

功能结束

winsun

秋来潮汐 发表于 2014-9-30 16:01
功能 按钮_删除账号_点击()
    变量 a,b,i
    表格.大小("表格0",a, b)

谢谢

winsun

秋来潮汐 发表于 2014-9-30 16:01
功能 按钮_删除账号_点击()
    变量 a,b,i
    表格.大小("表格0",a, b)

大神 能告诉我为什么要加个 i =i-1吗

suiyuan_yang

我来给发个比较完善的吧：

功能 删除_点击()
    变量 返回行,返回列,行
    表格.大小("表格",返回行,返回列)
    遍历(行=1;行<返回行;行++)
        如果(表格.获得复选框状态("表格",行,0))
            表格.删除行("表格",行)   
            表格.大小("表格",返回行,返回列)
        如果结束
    遍历结束
功能结束

suiyuan_yang

上面那个有点问题的，下面这个OK：

功能 删除_点击()
    变量 返回行,返回列,行,删除行数=0
    表格.大小("表格",返回行,返回列)
    遍历(行=1;行<返回行;行++)
        如果(表格.获得复选框状态("表格",行,0))
            表格.删除行("表格",行)
            序号=序号-1
            表格.大小("表格",返回行,返回列)
            表格.插入行("表格","", -1)
            表格.设置类型("表格",返回行,0,3)
            行=行-1
            删除行数=删除行数+1
        如果结束
    遍历结束
   
    表格.大小("表格",返回行,返回列)
    遍历(行=0;行<删除行数;行++)
        表格.删除行("表格",返回行-1)
        返回行=返回行-1
    遍历结束
功能结束

T星人

楼主，你这个代码是不是清空表格，我猜对了么