- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 我想设置一个排序按钮，不会写代码！ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=34257)
-- 发布时间：2013/6/4 2:25:00
-- 我想设置一个排序按钮，不会写代码！
我想设置一个排序按钮，不会写代码！谁能帮帮我呢？
如果按 这个按钮的话， 自动实现 按照 剩余数量 排序
可以帮帮我么？
-- 发布时间：2013/6/4 7:45:00
--
控件按钮的文本默认为“无序”
If e.Sender.Text = "无序" Then
e.Sender.Text = "升序"
Tables("表A").ApplySort = False
ElseIf e.Sender.Text = "升序" Then
e.Sender.Text = "降序"
Tables("表A").Sort = "剩余数量 ASC"
ElseIf e.Sender.Text = "降序" Then
e.Sender.Text = "无序"
Tables("表A").Sort = "剩余数量 DESC"
End If
[此贴子已经被作者于2013-6-4 8:32:14编辑过]
-- 发布时间：2013/6/4 16:15:00
-- 非常非常感谢这位大哥的热心帮助！！！
非常非常感谢这位大哥的热心帮助！！！
