VB.Net在某些单词之后拆分字符串

时间:2014-02-17 19:52:25

标签: vb.net string split keyword

我正在努力为 VB.Net 中的小问题找到解决方案。

我基本上有一个最初来自XML的字符串,我需要在某些单词之后插入一个新行(chr(13)。

例如,如果我的字符串是;

TAF AMD EGNM 171734Z 1718/1818 16010KT 9999 BKN018 TEMPO 1718/1803 8000 -RA BKN010 PROB30 TEMPO 1718/1724 4000 RADZ BKN006 PROB40 TEMPO 1800/1809 BKN005 PROB40 TEMPO 1809/1818 6000 SHRA BKN010 BKN020TCU BECMG 1810/1813 23010KT

我需要它看起来像这样;

TAF AMD EGNM 171734Z 1718/1818 16010KT 9999 BKN018 
     TEMPO 1718/1803 8000 -RA BKN010 
     PROB30 
     TEMPO 1718/1724 4000 RADZ BKN006 
     PROB40 
     TEMPO 1800/1809 BKN005 
     PROB40 
     TEMPO 1809/1818 6000 SHRA BKN010 BKN020TCU 
     BECMG 1810/1813 23010KT

您可以看到的要拆分的关键字是'TEMPO''PROB30''PROB40'

有什么想法吗?

1 个答案:

答案 0 :(得分:3)

试试这个:

Dim toReplace() = new String() {"TEMPO", "PROB30", "PROB40", (...)}

For Each word As String In toReplace
    value = value.Replace(word, Environment.NewLine & word)
Next