如何使用vb.net以编程方式对Excel中的列进行排序？

Imports Excel = Microsoft.Office.Interop.Excel

Dim xlApp As New Excel.Application
Dim xlWorkBook As Excel.Workbook = xlApp.Workbooks.Open("C:\path\to\your\file.xlsx")
Dim xlWorkSheet As Excel.Worksheet = xlWorkBook.Sheets("Sheet1")

Dim range As Excel.Range = xlWorkSheet.Range("A1:B10")

range.Sort(Key1:=range.Columns(1), Order1:=Excel.XlSortOrder.xlAscending, Header:=Excel.XlYesNoGuess.xlYes, OrderCustom:=1, MatchCase:=False, Orientation:=Excel.XlSortOrientation.xlSortColumns)

xlWorkBook.Save()
xlWorkBook.Close()

xlApp.Quit()