VBScript. Функция Split

Разбивает переданную строку на подстроки и заполняет ими возвращаемый массив.

 Split(string[, delimiter[, count[, compare]]])

string: Исходная строка. Если передана пустая строка "", функция вернет пустой массив нулевой длины.
delimiter: Опциональный параметр. Символ или строка разделитель. Если в качестве разделителя задана пустая строка, функция вернет массив с одним элементом, равным исходной строке.
count: Опциональный параметр. Максимальное количество элементов в массиве. По-умолчанию параметр имеет значение -1, что означает, что все выделенные подстроки будут занесены в массив.
compare: Опциональный параметр. Показывает какой тип сравнения будет использоваться для поиска разделителя в строке: двоичный (без учета регистра) или текстовый (с учетом регистра символов). Параметр задается с помощью констант vbBinaryCompare и vbTextCompare.

 Dim A, I
 A = Split("1, 2, 3, 4, 5", ",")
 I = A(1)                        ' I = "2"
 Sqr