powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Необходимо из текстовой строки выбрать данные
5 сообщений из 5, страница 1 из 1
Необходимо из текстовой строки выбрать данные
    #34818683
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
Необходимо из текстовой строки выбрать данные
    #34818691
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
посмотрите функцию Split
...
Рейтинг: 0 / 0
Необходимо из текстовой строки выбрать данные
    #34818802
32sasha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Пишу
a = Split(b, ";")
MsgBox a

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

b - моя строка
; - разделитель
На MsgBox a ведает ошибку № 13
Что не то?
Вот сам придумал. Массив решил посмотреть через MsgBox.
...
Рейтинг: 0 / 0
Необходимо из текстовой строки выбрать данные
    #34818824
Mons
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Dim a
Dim b as string
b="111111;22222"
a = Split(b, ";")
b = a(0) ' здесь 111111
b = a(1) ' здесь 22222
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Необходимо из текстовой строки выбрать данные
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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