MSAccess VBA-如何对列表框中的值进行排序

Question

我有一个通过DAO记录集填充的MS Access列表框。显示数据时，不会对值进行排序。我拥有的代码无法正常工作。

Dim sqlString As String
sqlString = "SELECT ReportName FROM MetadData.ReportDB_Test ORDER BY " & Me.ListReports.Value & " ASC;" 
Me.ListReports.RowSource = sqlString

Answer 1

如果仅设置列表框的行源，则无需使用VBA。只需将列表框的rowsource属性设置为所需的SQL（您甚至可以使用Access的查询生成器）。