| Вопрос: Помогите плизз | Добавлено: 13.12.05 11:57 |
Автор вопроса:  Byka
|
|
есть например Text1.text
в нем такие значения: Lol;890 Kok;132 Нужно чтобы прога брала только Lol и перемещала в переменную, а строку 890 в тдугую переменную. Знак ";" пропускается. После выполнения этих действий, перейти к следующей строчки |
| Ответы | Всего ответов: 6 |
|
Номер ответа: 1 Автор ответа:  astoro ICQ: 649109 Вопросов: 31 Ответов: 391 |
Профиль | | #1 | Добавлено: 13.12.05 12:53 |
|
txt = "kok;999"
ret1= Split(txt, ";"  (0)
ret2= Split(txt, ";" (1)
|
||
|
Номер ответа: 2 Автор ответа: AndreyMp ICQ: 237822510 Вопросов: 28 Ответов: 1182 |
Профиль | | #2 | Добавлено: 13.12.05 12:54 |
|
InStr
Mid |
||
|
Номер ответа: 3 Автор ответа: Byka Вопросов: 6 Ответов: 9 |
Профиль | | #3 | Добавлено: 13.12.05 14:34 |
|
txt = Text1.Text
ret1= Split(txt, ";" (0)
ret2= Split(txt, ";" (1)
Это берёт сразу весь текст, а нужно так чтобы брало только отну строчку, подскажите
|
||
|
Номер ответа: 4 Автор ответа: AgentFireICQ: 192496851 Вопросов: 75 Ответов: 3178 |
Профиль | | #4 | Добавлено: 13.12.05 14:54 |
| ret1 должна быть массiвом ret1() as string | ||
|
Номер ответа: 5 Автор ответа: BykaВопросов: 6 Ответов: 9 |
Профиль | | #5 | Добавлено: 13.12.05 15:19 |
|
ну никак немогу понять! =(
вот пример, помогите исправить http://wmgames.hut1.ru/download/4.rar Чтобы при нажатие на кнопку "Take" брало сначала первою строчку и записывала в другие поля. А при нажатии второй зар на кнопку, чтобы бралась вторая строчка файла. Если ктото сможет сделать, вышлете на мыло 434478@mail.ru или слейте кудать и дайте ссылку спасибо огромное |
||
|
Номер ответа: 6 Автор ответа: HACKERРазработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #6 | Добавлено: 14.12.05 00:32 |
|
Private Sub Command1_Click()
Static c Dim tmpArr() As String tmpArr = Split(Text1, vbCrLf) Text2 = Split(tmpArr(c), ";" (0)
Text3 = Split(tmpArr(c), ";" (1)
c = c + 1 End Sub |
||
Страница: 1 |