VBNet - Форум - Ламерский вопрос

Вопрос: Ламерский вопрос Добавлено: 27.03.03 11:30

Автор вопроса: Kitovras | ICQ: 173524840

Действительно сабж.

У меня есть стринговая переменная содержащая примерно следующие "blabla blublu".

Внимание вопрос: как из этой переменной выделить отдельно кусок до пробела и после пробела и записать в две другие стринговые переменные? Длина blabla и blublu может быть разной.

Я знаю, что ответ простой, но сам вспомнить не могу - склероз.

Ответить

Ответы Всего ответов: 15

Номер ответа: 1
Автор ответа:

boevik

Хранитель чата

ICQ: 137392264

Вопросов: 8
Ответов: 557

Web-сайт: www.hypertech.ru
Профиль | | #1

Добавлено: 27.03.03 12:27

dim a() as string

a = split("blaa bluuu", " ")

а(0) - первое слово
а(1) - второе
и т.д.

Ответить

Номер ответа: 2
Автор ответа:

Kitovras

ICQ: 173524840

Вопросов: 5
Ответов: 11

Профиль | | #2

Добавлено: 27.03.03 12:33

Я немного более коряво зделал:

blabla="blabla blublublu"

pp = Left$(blabla, InStr(blabla, " "))

mm = Right$(blabla, Len(blabla) - InStr(blabla, " "))

Ответить

Номер ответа: 3
Автор ответа:

Gravity

Вопросов: 6
Ответов: 120

Профиль | | #3

Добавлено: 27.03.03 13:45

dim a() as string

a = split("blaa bluuu", " ")

а(0) - первое слово
а(1) - второе

Вот это самое нормальное решение !!! А ты Kitovras наверное любишь поизвращаться ?

Ответить

Номер ответа: 4
Автор ответа:

Kitovras

ICQ: 173524840

Вопросов: 5
Ответов: 11

Профиль | | #4

Добавлено: 27.03.03 14:00

Ну извините многоуважаемый Gravity. Я не всезнайка, как смог так и зделал, пока от Вас ответа ждал.

Ответить

Номер ответа: 5 Автор ответа: Gravity Вопросов: 6 Ответов: 120	Профиль \| \| #5	Добавлено: 27.03.03 14:03
	Многоуважаемый Kitovras, я тоже как-то всё не знаю ... НО split надо знать .... Ответить

Номер ответа: 6
Автор ответа:

Kitovras

ICQ: 173524840

Вопросов: 5
Ответов: 11

Профиль | | #6

Добавлено: 27.03.03 14:08

Кому надо ? Я не специалист в программировании. А наезд не лучший помошник в обучении. При все при этом ответ дал не ты, тот кто его дал почему-то не наезжал, как думаешь, почему ?

Ответить

Номер ответа: 7 Автор ответа: Вопросов: 7 Ответов: 37	Web-сайт: www.littlehumans.nm.ru Профиль \| \| #7	Добавлено: 27.03.03 14:56
	Извините, что вмешиваюсь, но по-моему, если что-то можешь сделать почти "вручную", то это совсем не плохо. Как раз и учит разрабатывать алгоритмы. (а книжки читать все умеют) Ответить

Номер ответа: 8
Автор ответа:

Millenium

ICQ: 629966

Вопросов: 118
Ответов: 903

Web-сайт: www.aliyev.us
Профиль | | #8

Добавлено: 27.03.03 17:03

Люди, не спорти...
Я напривер начел вооще самого дурадского варианта когда это понадобилось, я искал используя for и next и проверял нужный симврл, доходя сохронял позицию и сцитывал с mid - вот...

Потом перешол на Do Loop и Until... А через время сменил его на case select - что юолее интересно, моя треья попытка была как у Kitovaр-а... А последняя вот Split'ом...

Человек учится на ошибках и совершенствует всё пошагно...
Курица тоже появилась с яйца, а не сразу... вот и афоризма...

Бай люди! Удачи вам!

Ответить

Номер ответа: 9
Автор ответа:

Alex_

ICQ: 202830092

Вопросов: 16
Ответов: 49

Профиль | | #9

Добавлено: 27.03.03 19:48

Уважаемый Kitovras!

"зделал" ПИШИТЬСЯ через "C"

Ответить

Номер ответа: 10
Автор ответа:

Kitovras

ICQ: 173524840

Вопросов: 5
Ответов: 11

Профиль | | #10

Добавлено: 27.03.03 19:55

А вы уважаемый Алекс находитесь в форуме по правописанию ? И основной эхотаг Русский язык ?

Один чел нормально ответил, остальные тоько выеживаться способны. А коль заело можно было мылом стукнуть а не в форум.

Ответить

Номер ответа: 11
Автор ответа:

Вопросов: 7
Ответов: 37

Web-сайт: www.littlehumans.nm.ru
Профиль | | #11

Добавлено: 28.03.03 09:42

Уважаемый Alex_!

Коль уж взялись исправлять чужие ошибки, то на заметку: не ПИШИТЬСЯ, а ПИШИТСЯ.

Ответить

Номер ответа: 12
Автор ответа:

Alex_

ICQ: 202830092

Вопросов: 16
Ответов: 49

Профиль | | #12

Добавлено: 28.03.03 20:13

Ладно, ладно ...

Ответить

Номер ответа: 13
Автор ответа:

Gravity

Вопросов: 6
Ответов: 120

Профиль | | #13

Добавлено: 01.04.03 02:49

А ВОТ ВАМ АЛГОРИТМ БЕЗО ВСЯКИХ 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 - кол-во слов в тексте ........ Вот И ВсЁ !!!!!!

Я всё по памяти писал, так что может где и описка

Ответить

Номер ответа: 14
Автор ответа:

Gravity

Вопросов: 6
Ответов: 120

Профиль | | #14

Добавлено: 01.04.03 02:49

А ВОТ ВАМ АЛГОРИТМ БЕЗО ВСЯКИХ 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 - кол-во слов в тексте ........ Вот И ВсЁ !!!!!!

Я всё по памяти писал, так что может где и описка

Ответить

Номер ответа: 15
Автор ответа:

Вопросов: 7
Ответов: 37

Web-сайт: www.littlehumans.nm.ru
Профиль | | #15

Добавлено: 01.04.03 22:37

Может устроим конурс на самый длинный алгоритм разделения строковой переменной? Победителю чугуниевый компьютер

Ответить

Страница: 1 |