Foxtable(狐表)用户栏目专家坐堂 → [求助]删除空行,不影响新增加的行


  共有2649人关注过本帖平板打印复制链接

主题:[求助]删除空行,不影响新增加的行

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


加好友 发短信
等级:幼狐 帖子:185 积分:1723 威望:0 精华:0 注册:2016/5/30 16:23:00
[求助]删除空行,不影响新增加的行  发帖心情 Post By:2016/10/12 10:23:00 [只看该作者]

我有增加按钮代码 ,我想增加后,未保存的空行,换行后可以自动删除

currentchanged 事件代码;

Dim ct As Table = CurrentTable
Dim name As String
For Each cl As Col In ct.Cols
    If cl.name.Endswith("名称") Then
        name = cl.name
        Exit For
    End If
Next
For Each r As Row In ct.Rows
    If r.Isnull(name)=False Then
        r.save()
        Forms("基本设置").Controls("增 加").Enabled = True
        Forms("基本设置").Controls("修 改").enabled = True
        Forms("基本设置").Controls("删 除").enabled = True
        Forms("基本设置").Controls("保 存").enabled = False
        Forms("基本设置").Controls("取 消").enabled = True
        Forms("基本设置").Controls("导 出").enabled = True
        Forms("基本设置").Controls("退 出").enabled = True

    End If
Next

谢谢


 回到顶部