1、使用外部数据表（ACCESS）2、多个账套（就是多家店的管理）
表A各列：店名、时间、货名、数量、单价、金额
例如在命令窗口执行操作之后（当然是用其它的方式增加数据，说在命令窗口执行，只是为了思路），能在界面上直接将各店数据分别放到各店名下面（不是用排序，因为还有其它的用途）
dim r as row = tables("A").addnew
r("店名") ＝ “店A”
r("时间") ＝ date.now
…………
systemready = false
tables("A").sort = "店名,时间 DESC“
for each r as row in tables("A").rows
r.datarow.baserow("_SortKey") = r.index
next
tables("A").sort = "“
systemready = true
但这样可能会有问题，多人同时在各自的电脑上输入数据后，表A的_sortKey可能会相互影响（_Sortkey的值应当是不能重复的）
要如何做才好呢？
如果用帮助里的“第三方开发接口”的方法，就可能得这么干了
Dim
drs As List(of
DataRow) =
DataTables("A").Select("","店名，时间 DESC")
For i As Integer = 0 To drs.Count - 1
drs(i).BaseRow("_SortKey") = i
Next
但在表A数据量很大的时候（比如上万、十万行），如果每一次增加行，都这样执行，会不会有效率问题？尤其是并发数大的时候
当然，时间不用降序，用升序也行。
－－－－－补充，用本地数据库测试，20000行数据，第三方开发接口方法用时2秒，还算可以接受，不知道到了十万级的数据会怎么样
[此贴子已经被作者于2016/10/12 10:02:35编辑过]
加好友 
发短信
Post By：2016/10/12 9:29:00 [只看该作者]
