关于排序用S打头的编码？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

关于排序我在搜索里找了一个跟我一样情况的，就是在基础的狐表里按照固定顺序输入的，但是生成EXCEl的表里顺序就乱了，是因为后面有空行插入，有一位老师给的答案是用_sevlwa 好像是这么个函数但是我忘了具体咋写了。请老师指教

没看懂，截图说明

图2 中的单位顺序按照图1 生成正常情况下基础表原来的顺序就是生成后的EXCEL顺序，但是中间加空行后就不一样了，恰恰我的基础表里有空行，而且空行还是必要的，如何设置代码老师
图片点击可在新窗口打开查看

此主题相关图片如下：2.png

Select Case e.Book.TempLate

Case "横名册"

Dim Filter As String = "单位名称 = '" & e.DataRow("单位名称") & "'"

Dim dt As DataTable = DataTables("竖名册")

Dim sum1 As Double = dt.Compute("Sum(正科配备)",Filter)

Dim sum2 As Double = dt.Compute("Sum(实际正科)",Filter)

Dim sum3 As Double = dt.Compute("Sum(副科配备)",Filter)

Dim sum4 As Double = dt.Compute("Sum(实际副科)",Filter)

Dim s1 As String = dt.GetComboListString("正科职数空缺", filter).replace("|", ",").trim(",")

Dim s2 As String = dt.GetComboListString("正科职数备注", filter).replace("|", ",").trim(",")

Dim s3 As String = dt.GetComboListString("副科职数备注", filter).replace("|", ",").trim(",")

Dim s4 As String = dt.GetComboListString("副科职数备注", filter).replace("|", ",").trim(",")

e.Book.Marks("分组统计字符") = "单位:" & e.DataRow("单位名称") & " 正科配备:" & sum1 & " 实际正科:" & sum2 & " 正科空缺:" & s1 & " 正科备注:" & s2 & " 副科配备:" & sum3 & " 实际副科:" & sum4 & " 副科空缺:" & s3 & " 副科备注:" & s4

End Select
图片点击可在新窗口打开查看

此主题相关图片如下：1.png

还是没看懂，放2个图对比一下，什么地方不一样

我参考了 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&replyID=397883&ID=59338&skin=1 <竖名册,单位名称,-11,_Sortkey> 可以解决部分问题但是还是有的空行生成表的时候还是给整没了。原来基础表中第二监察分局副局长与纪委接待员中间有空格，但是生成模板后空行没了

实例发上来测试。

例如竖名册 17 29 为空行那么生成EXCEL横名册中想保留原来的空行但是却被自动排序到最上面了

下载信息 [文件大小：下载次数： ]
点击浏览该文件:问老师.zip

空行那里，你要加上单位名称的值，如市纪委，即可。

谢谢老师可以实现了是否能将实现的空行变为合并单元格的空行呢老师
图片点击可在新窗口打开查看

此主题相关图片如下：qra2niwhi4p9{g~bp{5k4yt.png

按照老师的方案，又出现新的问题了红色的是不用生成表的，绿色的是需要生成的如何实现
图片点击可在新窗口打开查看

此主题相关图片如下：f`r694z49@783hdabkwx.png

主题：关于排序用S打头的编码？