代码合并 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 代码合并

共有4633人关注过本帖树形打印复制链接主题：代码合并

小猪鑫鑫

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

等级：四尾狐帖子：832 积分：5867 威望：0 精华：6 注册：2011/5/27 11:41:00

Post By：2013/4/28 8:37:00 [显示全部帖子]

楼主:不知道这样能否满足你的要求,先不保存清屏,然后再增加行

datatables("理化检测").LoadFilter ="_Identify is null"

datatables("理化检测").Load(false)

Dim Val As Integer

If InputValue(Val, "增加行", "请输入要增加的行数:") Then

Tables("理化检测").AddNew(Val)

End If

主题：代码合并