Just in case you change your mind and want to do it with regex
Code:
Dim pattern As String = "(?<=LIC)[0-9]*(?=-)"