利用.row(i).delete()删除表中记录不成功？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 利用.row(i).delete()删除表中记录不成功？

共有1810人关注过本帖树形打印复制链接主题：利用.row(i).delete()删除表中记录不成功？

malavazos

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

加好友

发短信

等级：小狐帖子：357 积分：3418 威望：0 精华：0 注册：2012/8/29 10:30:00

利用.row(i).delete()删除表中记录不成功？ 发帖心情

Post By：2019/5/26 21:07:00 [只看该作者]

希望利用下面的代码，每次执行都可以首先清空表B，然后在重新填充表b数据。可是得到的结果是每次仅仅减少一半的数据，并且不是固定值。不能首先全部清除记录再添加记录？

With Tables("表b")

output.show(.Rows.count -1)

For i As Integer = 0 To Tables("表b").Rows.Count -1

'output.show(i)

.Rows(i).Delete()

For h As Integer = 0 To 100

output.show(.Rows.count -1)

End With

Dim f As New Filler

f.SourceTable = DataTables("统计") '指定数据来源

f.SourceCols = "任务编号,设备台数" '指定数据来源列

f.DataTable = DataTables("表b") '指定数据接收表

f.DataCols = "任务编号,设备台数" '指定数据接收列

f.Fill() '填充数据

y2287958

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

加好友

发短信

等级：狐神帖子：4649 积分：33907 威望：0 精华：0 注册：2008/8/31 22:44:00

Post By：2019/5/27 8:57:00 [只看该作者]

With Tables("表A")

output.show(.Rows.count -1)

For i As Integer = .Rows.Count -1 To 0 Step -1

'output.show(i)

.Rows(i).Delete()

'For h As Integer = 0 To 100

'Next

'output.show(.Rows.count -1)

End With

有点甜

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

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2019/5/27 9:05:00 [只看该作者]

需要倒过来删除

http://www.foxtable.com/help/topics/0599.htm

下一主题 >> << 上一主题

主题：利用.row(i).delete()删除表中记录不成功？