以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  关于排序的问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=53263)

--  作者:ap9709130
--  发布时间:2014/7/3 17:49:00
--  关于排序的问题

我的表里有个列的字段是以字母开头的,如:B042 A045 E133 C149 D245 等。

 

现在想以列的字母开头的第一个字母排序:比如排序后成这个样子:A045 A081 B042 B059 C012 C024。

 

就是说先以第一个字母排序,再以后面的数字排序。请问这样用代码如何实现?多谢!


--  作者:Bin
--  发布时间:2014/7/3 17:50:00
--  
Tables("表名").sort="列名"
--  作者:ap9709130
--  发布时间:2014/7/3 18:33:00
--  

BIN

 

不行啊。不能按我的要求排序啊。


--  作者:ap9709130
--  发布时间:2014/7/3 18:36:00
--  

BIN

 

我搞错了。可以按要求排序。但为什么导出成为ECXEL 时,排序为什么又会乱呢?如何才能导出ECEXL时,也能按照这个顺序啊?


--  作者:ap9709130
--  发布时间:2014/7/3 18:41:00
--  

我的代码如下: 销售订单明细和销售订单主表建立了关联,

Dim drs As List(of DataRow) = DataTables("销售订单明细").Select("订单编号 = " & Tables("销售订单主表").Current("_Identify") & "")
If drs.Count>0 Then

 Dim j As Integer = drs.Count
            Dim tm As String  = ProjectPath & "Attachments\\1凯茵送货单" & j & ".doc" \'指定模板文件
            Dim fl As String = "d:\\送货单\\凯茵送货单" & t & ".doc" \'指定目标文件
            Dim wrt As New WordReport(Tables("销售订单主表"),tm,fl) \'定义一个WordReport
         Tables("销售订单明细").Sort = "产品名称"
            wrt.Build() \'逐行生成报表
            wrt.Show()

end if

生成的WORD 报表没有问题,但就是不能排序。销售订单的排序也没有问题,为什么生成报表时不能呢?


--  作者:有点甜
--  发布时间:2014/7/3 19:09:00
--  

 应该是可以的,实在不行,你就用BuildOne方法吧

 

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