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