Visual Basic, .NET, ASP, VBA, VBScript
 
  Справочники  
  Справочник по Windows API Справочник по Visual Basic  
     
  Функция Split (новая функция в VB6!)  
 

Функция

Split

новая функция в VB6!

Синтаксис

Split(expression[, delimiter[, limit[, compare]]])

Возвращает одномерный массив (начиная с нуля), содержащий определенное число элементов. Используйте эту функцию, а не изобретайте свои аналоги как я видел во многих программах. Split написана очень грамотно и работает очень быстро.

Параметры

Наименование

Описание

Expression

Обязательный. Аргумент, содержащий строку, которую нужно расщепить. Если аргумент содержит нулевую строку(""), то возвращается пустой массив, т.е. массив без элементов и данных

Delimiter

Необязательный. Символы типа String, которые используются в качестве разделителя строки. Если аргумент опущен, то по умолчанию используется символ пробела(" "). Если же аргумент содержит нулевую строку(""), то возвращается одноэлементный массив, содержащее целую строку

Limit

Необязательный. Аргумент, содержащий число возвращаемых субстрок. Если аргумент опущен или равен -1, то обрабатывается вся строка

Compare

Необязательный. Аргумент - число или константа, указывающее на используемый вид сравнения:
vbUseCompareOption=-1 Используются установки, задаваемые оператором Option Compare. Используется по умолчанию
vbBinaryCompare=0 Двоичное сравнение. Сравнение строк производится по внутренним кодам символов, определяемых кодовой страницей. Буквы разных регистров считаются разными
vbTextCompare=1 Текстовое сравнение. Сравнение строк без учета регистра на основе системной национальной настройки
vbDatabaseCompare=2 Сравнение на основе установок, принятых в обрабатываемой базе данных. Применяется в MS Access

Замечания

Функция использует именованные аргументы.

Пример использования

'данный пример вернет вам имя текущего устройства, то есть "C:"
arr = Split("C:\path1\path2\path3\FileName", "\")
MsgBox arr(0)

'следующая функция разбивает отдельные строки текста на элементы массива
'используйте эту функцию везде, где нужно определить имя текущей
'папки, если известен полный путь:

MsgBox CurrentFolder("D:\garbage\Bgarbage") 'вернет вам "Bgarbage"
'не трудно будет добавить в число входящих параметров функции
'CurrentFolder числового элемента, который будет определять, что
'необходимо возвратить: имя диска, полный путь без имени файла,
'или только имя файла.

Public Function CurrentFolder(sFolderPath)
Dim str1() As String
  str1 = Split(sFolderPath, "\")
  CurrentFolder = str1(UBound(str1))
End Function

Дополнительная информация

Категория: Обработка массивов и строк

Еще функции: Array, Asc, Filter, InStr, InStrRev, Join, LBound, LCase, Left, Len, LTrim, Mid, Partition, Replace, Right, RTrim, Space, Spc, Split, StrComp, StrConv, String, StrReverse, Tab, Trim, UBound, UCase

 
     
  VBNet online (всего: 51200)  
 

Логин:

Пароль:

Регистрация, забыли пароль?


В чате сейчас человек
 
     
  VBNet рекомендует  
   
     
  Лучшие материалы  
 
ActiveX контролы (112)
Hitman74_Library (36119)
WindowsXPControls (20739)
FlexGridPlus (19374)
DSMAniGifControl (18295)
FreeButton (15157)
Примеры кода (546)
Parol (18027)
Passworder (9299)
Screen saver (7654)
Kerish AI (5817)
Folder_L (5768)
Статьи по VB (136)
Мое второе впечатление... (11236)
VB .NET: дорога в будущее (11161)
Основы SQL (9225)
Сообщения Windows в Vi... (8788)
Классовая теория прогр... (8619)
 
     
Техническая поддержка MTW-хостинг | © Copyright 2002-2011 VBNet.RU | Пишите нам