@ OP - Слегка адаптируя ваш ответ, чтобы он мог работать с именами любой длины:
Strings.Trim(Strings.Split(PDFText.Substring(PDFText.IndexOf("**** ",0)+15,30),"*")(0))
Здесь я изменил длину подстроки с 16 до 30, что, я думаю, будет длинным достаточно для большинства имен (измените длину, если вам нужно). Это должно вернуть "James Fi sh **** JDR0929879 ***", или что-то подобное, если я пропустил 1 или 2 символа.
Функция Strings.Split (), использующая "*" как разделитель затем разделит эту подстроку на несколько других подстрок, первая из которых нам нужна с индексом (0).
Функция Strings.Trim () удалит лишний пробел в конце фамилии. , Вы можете использовать RTrim (), если вы предпочитаете технически это все, что требуется здесь. Trim () удаляет пробелы из начала и конца, нам нужно только удалить из конца здесь, но лучше всего быть осторожным со строками.