Вы хотите только цифры, верно?
тогда вы могли бы сделать это так
Dim theString As String = "/79465*44498%464"
Dim ret = Regex.Replace(theString, "[^0-9]", String.Empty)
НТН
редактирование:
или вы хотите разделить все нечисловые символы?
тогда это будет так
Dim ret = Regex.Split(theString, "[^0-9]")