System.Text.RegularExpressions:正規表現を使ってみる

簡単なサンプル.
111-222 という値を 222-111という形に入れ替えて返す。

VB6時代のReplaceではできなかったと思う。
VBScriptにもRegexあった気がするが...忘れました。

Imports System.Text.RegularExpressions

    Sub Main()
        Console.WriteLine(swaptext("200-300"))
	End Sub

    'require "Imports System.Text.RegularExpressions" for Regex class
    Function swaptext(ByVal input As String) As String
        Return Regex.Replace(input, _
            "\b(?\d{1,3})-(?\d{1,3})\b", _
            "${second}-${first}")
    End Function