VBNet - Форум - простенький вопросец по спискам (vbs)

Вопрос: простенький вопросец по спискам (vbs) Добавлено: 24.09.09 18:05

Автор вопроса:

Как в vbs реализовать список , затем присвоить поочередно значения его элементов одной переменной

Что то типо во этого :

Dim переменная

Список [pivo1,pivo2,pivo3]

переменная = элемент списка

msgbox переменная

цикл или что то ему подобное...

Ну в общем основную идею донес. Жду с нетерпением ваших предложений
Ответить

Ответы Всего ответов: 4

Номер ответа: 1 Автор ответа: Шпион ICQ: 250543104 Вопросов: 13 Ответов: 118	Профиль \| \| #1	Добавлено: 25.09.09 06:50
	strDelimiter strSrc="pivo" & strDelimiter & "pivo2" & strDelimiter & "pivo3" arrSrc=split(arrSrc,strDelimiter) For i=0 To ubound(arrSrc)-1 strVariable=arrSrc(i) Next Ну, в общем, основную идею донес...(с) Ответить

Номер ответа: 2 Автор ответа: Шпион ICQ: 250543104 Вопросов: 13 Ответов: 118	Профиль \| \| #2	Добавлено: 25.09.09 06:51
	кстати, strDelimiter="," либо любой другой удобный Вам разделитель, не встречающийся в значениях переменных Ответить

Номер ответа: 3 Автор ответа: Вопросов: 1 Ответов: 2	Профиль \| \| #3	Добавлено: 25.09.09 08:18
	Dim Delim,SList,Arr,Svar Delim=";" SList ="pivo1" &Delim& "pivo2" &Delim& "pivo3" Arr=split(SList,Delim) msgbox "&Arr&" For i=0 To ubound(Arr)'-1 Svar=Arr(i) msgbox Svar Next Благодарю за внимание - вполне бодренько работает) Ответить

Номер ответа: 4 Автор ответа: alroy Вопросов: 3 Ответов: 28	Профиль \| \| #4	Добавлено: 20.10.09 02:03
	ребята ну вы и напридумывали вот так мне кажется будет проще: my_arr = Array("pivo1", "pivo2", "pivo3", "pivo4") For Each element In my_arr MsgBox element Next Ответить

Страница: 1 |