[求助]在指定行插入行 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]在指定行插入行

共有4229人关注过本帖树形打印复制链接主题：[求助]在指定行插入行

moxuejiahui

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

等级：幼狐帖子：105 积分：849 威望：0 精华：0 注册：2015/1/25 23:22:00

[求助]在指定行插入行 发帖心情

Post By：2015/4/24 21:48:00 [只看该作者]

我现在用的是FOR next遍历整个表，想在符合条件的行下面插入一行的话要怎么写代码呢，我现在用的代码是在行上面插入的行

黄训良

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

等级：五尾狐帖子：1100 积分：8985 威望：0 精华：0 注册：2014/3/15 14:36:00

Post By：2015/4/24 22:00:00 [只看该作者]

一般不主张插入行，

With Tables("表A")

    Dim r As Integer
    r = .FindRow("[公司名称] Like '%湛江%'", .Position + 1, True )
    If r >= 0 Then
        .Position = r + 1

.InsertNew()
End If
End With

[此贴子已经被作者于2015/4/24 22:03:38编辑过]

主题：[求助]在指定行插入行