Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Необходимо из текстовой строки выбрать данные / 5 сообщений из 5, страница 1 из 1
21.09.2007, 17:46
    #34818683
32sasha
32sasha
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Необходимо из текстовой строки выбрать данные
Необходимо из текстовой строки 164 +IsNull(" 02.12.2007 ; 21.09.2007 ; 0 ; 10 ; 22 ; 33 ; 44 ; 55 ")
1) Выбрать 164 (все символы к +)
2) 02.12.2007 (от " к ;)
3) 21.09.2007 (далее разделители ;)
4) 0
5) 10
6) 22
7) 33
8) 44
9) 55 (от ; к ")
С помощью
Код: plaintext
1.
Trim(IIf(InStr(CBox1, """) > 0, StrReverse(Right(StrReverse(CBox1), _
Len(CBox1) - InStr(StrReverse(CBox1), """))), CBox1))
Как-то не серьёзно, возможно есть другой способ. Подскажите, пожалуйста.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.09.2007, 17:48
    #34818691
Deggasad
Deggasad
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Необходимо из текстовой строки выбрать данные
посмотрите функцию Split
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.09.2007, 18:25
    #34818802
32sasha
32sasha
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Необходимо из текстовой строки выбрать данные
Пишу
a = Split(b, ";")
MsgBox a

b - моя строка
; - разделитель
На MsgBox a ведает ошибку № 13
Что не то?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.09.2007, 18:31
    #34818814
32sasha
32sasha
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Необходимо из текстовой строки выбрать данные
32sashaПишу
a = Split(b, ";")
MsgBox a

b - моя строка
; - разделитель
На MsgBox a ведает ошибку № 13
Что не то?
Вот сам придумал. Массив решил посмотреть через MsgBox.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.09.2007, 18:33
    #34818824
Mons
Mons
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Необходимо из текстовой строки выбрать данные
Dim a
Dim b as string
b="111111;22222"
a = Split(b, ";")
b = a(0) ' здесь 111111
b = a(1) ' здесь 22222
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Необходимо из текстовой строки выбрать данные / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 387ms
Закрыть
start [/forum/topic.php?fid=60&mobile=1&tid=2163368]:
 0ms
get settings:
 10ms
get forum list:
 15ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 54ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 36ms
get tp. blocked users:
 1ms
others: 256ms
total:  387ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]