[求助]如何在单元格为空时，回车不新增行 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]如何在单元格为空时，回车不新增行

共有2226人关注过本帖树形打印复制链接主题：[求助]如何在单元格为空时，回车不新增行

WUZHAN

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：373 积分：2732 威望：0 精华：0 注册：2012/2/17 20:05:00

[求助]如何在单元格为空时，回车不新增行 发帖心情

Post By：2015/7/11 11:22:00 [只看该作者]

表中有单号列和客户名称列

我在表事件AfterEdit写有代码：If e.Table.Cols(e.Table.ColSel).Name = "单号" Then
       With Tables("清洗管理")
        Tables("清洗管理").AddNew
        Tables("清洗管理").Select(.Rows.Count - 1,0)
    End With
    CurrentTable.Focus
    Sendkeys.Send("")
End If

在表事件KeyDown写有代码：If e.KeyCode = Keys.Enter Then
    If e.Table.Cols(e.Table.ColSel).Name = "单号" Then
        With Tables("清洗管理")
            Tables("清洗管理").AddNew
            Tables("清洗管理").Select(.Rows.Count - 1,0)
        End With
        CurrentTable.Focus
        Sendkeys.Send("")
    End If
End If

如何在单号单元格为空客户名称单元格为空的时候，回车就不会增加行，