Страница: 1 |
значит попробовал: dim TEMP cap1.caption ="t=1 t=2 t=3" TEMP = split(cap1.caption, " ") TEMP(0) c этим проблем нет А вот когда TEMP(1) бывет пустым я не доганю как с этим бороться выдаётся постоянная ошибка!!!!
У меня все нормально Этакая фишка у тебя выскочит, если ты имеешь два подряд пробела. Естественно умненький Split считает, что между ними тоже что-то есть только это что-то есть ничего. Соответственно, нужны просто условия отлова пустых значений. используй >"", а также функции IsNull и IsEmpty (последнюю даже скорее всего). А ВОТ ВАМ АЛГОРИТМ БЕЗО ВСЯКИХ SPLIT dim text as string dim text2 as string text2=text dim a(100) for i =1 to len (text) a(i)=left (text,1) text=right (text, (len(text)-1) next i dim b(100) : e="" : n=1 for i = 1 to len (text2) if a(i) <> " " then e=e+a(i) else b(n)=e : e="" : n=n+1 next i b(n) = e И в конце концов получите массив b где записаны слова, n - кол-во слов в тексте ........ Вот И ВсЁ !!!!!! Я всё по памяти писал, так что может где и описка Страница: 1 |
Вопрос: SPLIT пожалуйста разжуйте!
Добавлено: 27.03.03 20:18
Автор вопроса: Неясов_Андрей | Web-сайт:
Ответы
Всего ответов: 3
Номер ответа: 1
Автор ответа:
CyRax
Разработчик Offline Client
ICQ: 204447456
Вопросов: 180
Ответов: 4229
Web-сайт:
Профиль | | #1
Добавлено: 27.03.03 21:40
Номер ответа: 2
Автор ответа:
hedgehog
ICQ: 175571327
Вопросов: 15
Ответов: 207
Web-сайт:
Профиль | | #2
Добавлено: 28.03.03 11:34
Номер ответа: 3
Автор ответа:
Gravity
Вопросов: 6
Ответов: 120
Профиль | | #3
Добавлено: 01.04.03 02:52