Substring () возвращает новый экземпляр String, содержащий диапазон символов. Он генерирует исключения для недопустимых аргументов.
Module Module1
Sub Main()
Dim literal As String = "Havana"
' Take the first 3 characters and put them in a new string.
Dim substring As String = literal.Substring(0, 1)
Console.WriteLine("SUBSTRING: {0}", substring)
End Sub
End Module
Вывод
ПОДПИСЬ: H