请问水晶包表，数据分组后，如何用程序控制按指定的字段排序？？

[kenways]

请问水晶包表，数据分组后，如何用程序控制按指定的字段排序？？

[lbmshiwo]

1、可以在SQL語句中先排好序。
2、或可以分組後再按某一字段進行分组，再在Record Sort Order 中設置排序
3'代码:例:
Dim crReportDocument As ReportDocument

Public Sub changeSortField(mySortFld As String, mySortDir As String)

Dim crSortField As SortField
Dim crSortDirection As SortDirection
Dim crDatabaseFieldDefinition As DatabaseFieldDefinition

For Each crSortField In crReportDocument.DataDefinition.SortFields
If crSortField.Field.Name.ToString = mySortFld Then
crDatabaseFieldDefinition = crReportDocument.Database.Tables(0).Fields(mySortFld.ToString)
crSortField = crReportDocument.DataDefinition.SortFields(0)
crSortField.Field = crDatabaseFieldDefinition

If mySortDir = "Ascending" Then
crSortField.SortDirection = SortDirection.AscendingOrder
Else
crSortField.SortDirection = SortDirection.DescendingOrder
End If
End If
Next

CrystalReportViewer1.ReportSource = crReportDocument
End Sub

[xwdd129]

在报表里加好排序字段，然后在程序种控制。可参考下面文章，里面有关于排序的方法：

经典水晶报表设计——单击表头排序表格
http://blog.csdn.net/haibodotnet/archive/2003/12/25/21549.aspx