[求助]关于自动排序！ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]关于自动排序！

共有6916人关注过本帖树形打印复制链接主题：[求助]关于自动排序！

sadfox

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

加好友

发短信

等级：童狐帖子：292 积分：1864 威望：0 精华：0 注册：2013/3/16 21:31:00

[求助]关于自动排序！ 发帖心情

Post By：2013/3/30 10:55:00 [显示全部帖子]

需要在表A的数量列有新内容输入时，自动按升序排序，并且数量列空值行不参加排序、我现在怎么搞，自动排序都把空值行给我排最前面。

求大神帮忙啊！

sadfox

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

加好友

发短信

等级：童狐帖子：292 积分：1864 威望：0 精华：0 注册：2013/3/16 21:31:00

Post By：2013/3/30 11:13:00 [显示全部帖子]

以下是引用狐狸爸爸在2013-3-30 11:03:00的发言：
没有必要这样的，录入完成之后，需要排序的时候，再单击排序就行了。

狐爸啊，300个表，难道让我一个表去点一次啊！

sadfox

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

加好友

发短信

等级：童狐帖子：292 积分：1864 威望：0 精华：0 注册：2013/3/16 21:31:00

Post By：2013/3/30 11:26:00 [显示全部帖子]

我现在是把表事件里写上这个

If e.DataCol.Name = "时间" Then '如果是已结帐列的内容变动Dim t As Table = Tables("日考核")
Dim t As Table = Tables("日考核3")
t.Sort = "时间" '指定排序字段
End If

但是数据变化自动排序的时候都是把空白行值排最前面！

sadfox

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

加好友

发短信

等级：童狐帖子：292 积分：1864 威望：0 精华：0 注册：2013/3/16 21:31:00

Post By：2013/3/30 11:27:00 [显示全部帖子]

以下是引用lsy在2013-3-30 11:07:00的发言：

ValidateEdit

e.Table.Filter = ("数量列 Is Not Null")
e.Table.Sort = "数量列"

最好做个菜单按钮，录完了再筛选、排序。

CurrentTable.Filter = ("数量列 Is Not Null")
CurrentTable.Sort = "数量列"

[此贴子已经被作者于2013-3-30 11:15:08编辑过]

LSY有办法没？做按钮不现实啊！

sadfox

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

加好友

发短信

等级：童狐帖子：292 积分：1864 威望：0 精华：0 注册：2013/3/16 21:31:00

Post By：2013/3/30 11:31:00 [显示全部帖子]

以下是引用狐狸爸爸在2013-3-30 11:26:00的发言：

做个按钮，点一次就行：

for each t as table in tables

t.sort = "xxx"

另外，如果你的系统真的加载了300个表，那么你的设计思路大大的有问题。

狐爸别走，等我传个列子，帮忙看看！

sadfox

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

加好友

发短信

等级：童狐帖子：292 积分：1864 威望：0 精华：0 注册：2013/3/16 21:31:00

Post By：2013/3/30 11:55:00 [显示全部帖子]

以下是引用lsy在2013-3-30 11:31:00的发言：

3楼的办法该行了吧？

那个只是在我输入数据的表进行排序，而不是在我加载数据的表上排序！

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

主题：[求助]关于自动排序！