String в Array VBS

Программирование на Active Server Pages и VBScript.
SlaDER
Обычный пользователь
Обычный пользователь
 
Сообщения: 66
Зарегистрирован: 06.10.2005 (Чт) 16:54

String в Array VBS

Сообщение SlaDER » 17.06.2009 (Ср) 13:58

Привет всем! Как можно на vbs из String сделать массив.
Например:

Str = "Привет"
Mas = Array("П","р","и","в","е","т")

Денис
Доктор VB наук
Доктор VB наук
Аватара пользователя
 
Сообщения: 2734
Зарегистрирован: 07.11.2006 (Вт) 13:55
Откуда: Ейск, Краснодарский край

Re: String в Array VBS

Сообщение Денис » 18.06.2009 (Чт) 13:18

В VBS?
Наверное, только вручную. Например:
Код: Выделить всё
dim str1
dim mas(100)

Str1 = "Привет"
for i = 1 to 6
    Mas(i) = mid(str1, i, 1)
next

msgbox "Array(" & chr(34) & Mas(1) & chr(34) & "," _
                & chr(34) & Mas(2) & chr(34) & "," _
                & chr(34) & Mas(3) & chr(34) & "," _
                & chr(34) & Mas(4) & chr(34) & "," _
                & chr(34) & Mas(5) & chr(34) & "," _
                & chr(34) & Mas(6) & chr(34) & ")", vbinformation, "Test"
Программирование — богоизбранная дисциплина! Если бог и есть, то вселенную он скомпилировал, не иначе.

trash
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 113
Зарегистрирован: 28.01.2009 (Ср) 12:09

Re: String в Array VBS

Сообщение trash » 19.06.2009 (Пт) 15:28

Тогда уж так:
dim mas()
Redim mas(Len(Str1)-1)
for i = 0 to Len(Str1)-1

CodeNoob
Начинающий
Начинающий
 
Сообщения: 9
Зарегистрирован: 03.11.2009 (Вт) 16:08

Re: String в Array VBS

Сообщение CodeNoob » 08.11.2009 (Вс) 10:59

A Split не подойдет?


Вернуться в ASP и VBScript

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 12

    TopList