//程序代码
Dim aryData, aryColumns, objDatatable, table1
// 构建数据表
aryData = [["a", 2], ["b", 1], ["c", 4], ["d", 5], ["e", 3]]
aryColumns = ["letter", "number"]
objDatatable = Datatable.BuildDataTable(aryData, aryColumns)
Log.Info(objDatatable)
// 重新排序
objDatatable = Datatable.SortDataTable(objDatatable, "number", true)
Log.Info(objDatatable)
//获取新列
table1 = Datatable.SelectDataTableColumns(objDatatable, ["letter"])
Log.Info(table1)
//复制到剪切板
Datatable.DataTableToClipboard(table1)
/*
粘贴结果:
letter
b
a
e
c
d