Функция Mid (Visual Basic)
Обновлен: Ноябрь 2007
Возвращает строку, содержащую указанное число знаков строки.
Public Shared Function Mid( _
ByVal str As String, _
ByVal Start As Integer, _
Optional ByVal Length As Integer _
) As String
Параметры
str
Требуется. Выражение String, из которого возвращаются знаки.Start
Обязательный параметр. Выражение типа Integer. Начальная позиция возвращаемых знаков. Если Start больше, чем количество знаков в str, Mid функция возвращает строку нулевой длины (" ").Start является основой.Length
Необязательный параметр. Выражение типа Integer. Число возвращаемых знаков. Если этот параметр опущен или количество знаков в тексте меньше, чем Length (включая знак на позиции Start), возвращаются все знаки от начальной позиции до конца строки.
Исключения
Тип исключения |
Номер ошибки |
Условие |
---|---|---|
Значение параметра Start <= 0 или Length < 0. |
См. столбец "Номер ошибки", если выполняется обновление приложений Visual Basic 6.0, в которых используется неструктурированная обработка ошибок. (Можно сравнить номер ошибки с Свойство Number (объект Err).) Однако по возможности следует заменять такую систему управления ошибками на Обзор структурной обработки исключений в Visual Basic.
Заметки
Чтобы определить число знаков в str, воспользуйтесь функцией Len.
Visual Basic имеет функцию Mid и оператор Mid. Оба этих элемента влияют на указанное число знаков в строке, но функция Mid возвращает знаки, в то время как оператор Mid заменяет символы. Дополнительные сведения см. в разделе Оператор Mid.
Примечание. |
---|
В предыдущих версиях Visual Basic функция MidB возвращала строку в байтах, а не знаках. В основном она применяется для преобразования строк в приложениях с двухбайтовым набором знаков (DBCS). Все строки Visual Basic .NET кодируются в Юникоде. MidB не поддерживается. |
Пример
В данном примере функция Mid используется для возврата указанного числа знаков строки.
' Creates text string.
Dim TestString As String = "Mid Function Demo"
' Returns "Mid".
Dim FirstWord As String = Mid(TestString, 1, 3)
' Returns "Demo".
Dim LastWord As String = Mid(TestString, 14, 4)
' Returns "Function Demo".
Dim MidWords As String = Mid(TestString, 5)
Требования
Пространство имен:Microsoft.VisualBasic
**Модуль:**Strings
**Сборка:**Visual Basic (библиотека времени выполнения, в Microsoft.VisualBasic.dll)
См. также
Основные понятия
Сводка изменений поддержки элементов программирования