Ветеран
Сообщения: 27449
Благодарности: 8087
|
Профиль
|
Отправить PM
| Цитировать
2SendMessage, оффтопиком:
читать дальше »
Так:
Код: 
Dim arrRepl
arrRepl = Array("_something1_", "_something2_", "_something3_", "_something4_")
…
For Each elem In arrRepl
'или
'For i = LBound(arrRepl) To Ubound(arrRepl)
…
удобнее.
|
Отправлено: 02:17, 26-06-2012
| #13
|