Imports System
Imports System.Text.RegularExpressions
Public Class Test
Public Shared Sub Main()
Dim s As String = Regex.Replace("a/users/12345/badges", "(?=/[^/]*$)", vbTab)
Console.WriteLine(s)
End Sub
End Class
SW1wb3J0cyBTeXN0ZW0KSW1wb3J0cyBTeXN0ZW0uVGV4dC5SZWd1bGFyRXhwcmVzc2lvbnMKClB1YmxpYyBDbGFzcyBUZXN0CglQdWJsaWMgU2hhcmVkIFN1YiBNYWluKCkKCQlEaW0gcyBBcyBTdHJpbmcgPSBSZWdleC5SZXBsYWNlKCJhL3VzZXJzLzEyMzQ1L2JhZGdlcyIsICIoPz0vW14vXSokKSIsIHZiVGFiKQoJCUNvbnNvbGUuV3JpdGVMaW5lKHMpCglFbmQgU3ViCkVuZCBDbGFzcw==