newRow("OrderReference") = line.Substring(line.IndexOf("*1003") + 5, line.IndexOf("*", line.IndexOf("*1003") + 5) - line.IndexOf("*1003") - 5)
你有它。很长很丑。我在想这个:
Dim indexPlus = line.IndexOf("*1003") + 5
Dim indexMinus = line.IndexOf("*1003") - 5
newRow("OrderReference") = line.Substring(indexPlus, line.IndexOf("*", indexPlus) - indexMinus)
但这引入了新的无意义的变量。不满意。
也许 RegEx 是这里的救星?
不幸的是,我不能更改输入数据:-(
输入数据由 BWA 格式(书籍流行)组成。在这里你可以看到有问题的部分:
此示例集中的所有代码都是必需的。只有相应的值会改变。