比如获取一张流转车间表的流转车间名称填到订单明细表的生产车间的单元格中,怎么设置能让车间名按照输入的行的前后顺序排列而不是按字母大小排列?
Dim p As List(Of String)
Dim x As String = ""
p = DataTables("流转车间").GetValues("流转车间","工单号= '" & Tables("计划总表_订单明细").Current("工单号") & "'")
For Each s As String In p
x = x + s + "."
Next
Dim v As Boolean = (x <> "")
If v = False Then
x = "工序未设置!"
End If
Tables("计划总表_订单明细").Current("生产车间") = x.trim(".")