排序:
Dim objReport(0) As stReport
Try
For intK = 1 To 15
objReport(intK).Name = "User" & GetRandomNumber()
objReport(intK).Age = intK
objReport(intK).Misc1 = "data"
Next
Return objReport
有没有简单的方法可以按名称对objReport排序?
注意:该代码只是一个示例。
您可以使用OrderBy
扩展函数对它们进行排序
objReport = objReport.OrderBy(Function(x) x.Name).ToArray()