Ответить на сообщение
Вернуться к теме
Вы отвечаете на сообщение:
ник: Анатолий (Киев) Например:
v = Split("8600 C2Duo E6550 320Gb DVDRW 2Gb GT256Mb CR Vista 6550 C2Duo...", " ") For i = LBound(v) To Ubound(v) If i = 0 Then s = " " & v(i) & " " ElseIf Not (s Like """* " & v(i) & " *""") Then s = s & v(i) & " " End If Next s = Trim(s)
Ваше имя:
Пароль:
Сообщение:
Прикрепить:
Для вставки смайлов в текст щелкните по значку.