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

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

共有1708人关注过本帖树形打印复制链接主题：全局代码

实话实说

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

等级：九尾狐帖子：2649 积分：19390 威望：0 精华：1 注册：2008/9/12 9:19:00

全局代码

Post By：2017/8/12 19:55:00 [显示全部帖子]

以下是重置插入行代码，如何把它转换成全局代码

Dim drs As List(of DataRow) = DataTables("材料总帐").Select("","[_SortKey]")

For i As Integer = 0 To drs.Count - 1

drs(i).BaseRow("_SortKey") = i

实话实说

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

等级：九尾狐帖子：2649 积分：19390 威望：0 精华：1 注册：2008/9/12 9:19:00

Post By：2017/8/13 15:26:00 [显示全部帖子]

我想在工具栏上做一重置插入行按钮（重置_SortKey]列），对所有当前表适用。

主题：全局代码