我有一些文件的名字像前面和后面在一个文件夹像随机模式ABC_IP_F1,
MNO_IP_F2,
ABC1_IP_F3
MNO2_IP_F4
ABC3_IP_F5
MNO4_IP_F6
ABC5_IP_F7
MNO6_IP_F8
ABC_IP_B1
MNO_IP_B2
ABC1_IP_B3
MNO2_IP_B4
ABC3_IP_B5
MNO4_IP_B6
ABC5_IP_B7
MNO6_IP_B8
我得到所有的文件和合并成一个tif格式的图像,但我的问题是
如何获取像
这样的文件F1B1F2B2
表示前1然后后1然后前2然后后2,像这样
基本思想是这样的:
Dim OrderedFiles As String() =
My.Computer.FileSystem.GetFiles("c:").OrderBy(Function(fname) MyOrderKey(fname)
).ToArray()
Function MyOrderKey(fname as String) as String
Return fname.Replace("_B", "_Z") 'make B appear after F
End Function
它给你(如果省略了path):
ABC1_IP_F3
ABC1_IP_B3
ABC3_IP_F5
ABC3_IP_B5
ABC5_IP_F7
ABC5_IP_B7
ABC_IP_B1
MNO2_IP_F4
MNO2_IP_B4
MNO4_IP_F6
MNO4_IP_B6
MNO6_IP_F8
MNO6_IP_B8
MNO_IP_F2
MNO_IP_B2