| Вопрос: Разрезка строки | Добавлено: 22.09.04 17:52 |
Автор вопроса:  RomaVis | ICQ: 266287351 |
|
Вот такая задача:
Надо выбрать из строки ту её часть, которая находится перед первым пробелом... Незнаю как!!!! |
| Ответы | Всего ответов: 6 |
|
Номер ответа: 1 Автор ответа:  .::EclipsE::. ICQ: 208952501 Вопросов: 22 Ответов: 85 |
Профиль | | #1 | Добавлено: 22.09.04 18:06 |
Public Function EraseString(m_String As String)
 im i_pos As Integer
i_pos = InStr(1, m_String, " ", vbTextCompare) If i_pos <> 0 Then EraseString = Mid(m_String, 1, i_pos) End If End Function |
||
|
Номер ответа: 2 Автор ответа: dNW Вопросов: 30 Ответов: 683 |
Профиль | | #2 | Добавлено: 22.09.04 18:08 |
|
А можно быстрее
MsgBox Left$("visual basic", InStr("Visual Basic", " "  )
|
||
|
Номер ответа: 3 Автор ответа: .::EclipsE::.ICQ: 208952501 Вопросов: 22 Ответов: 85 |
Профиль | | #3 | Добавлено: 22.09.04 18:10 |
| Можно и так, просто я сразу сделал функцию (с проверкой на существование пробела) | ||
|
Номер ответа: 4 Автор ответа:  Павел Администратор ICQ: 326066673 Вопросов: 368 Ответов: 5968 |
Web-сайт: Профиль | | #4 | Добавлено: 23.09.04 15:39 |
|
А можно так: Dim str As String str = "111 222 333" Dim result As String result = Split(str)(0) |
||
|
Номер ответа: 5 Автор ответа: АлександрРазработчик Offline Client ICQ: 204034 Вопросов: 106 Ответов: 1919 |
Профиль | | #5 | Добавлено: 23.09.04 17:37 |
| Павел, а почему разделителя в Split'e нет? | ||
|
Номер ответа: 6 Автор ответа: ПавелАдминистратор ICQ: 326066673 Вопросов: 368 Ответов: 5968 |
Web-сайт: Профиль | | #6 | Добавлено: 24.09.04 09:06 |
|
По умолчанию разделитель - пробел. |
||
Страница: 1 |