Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - VBA

Страница: 1 |

 

  Вопрос: Работа со строкой Добавлено: 22.11.08 18:38  

Автор вопроса:  Саня | Web-сайт: crysis-club.clan.su | ICQ: 444856908 
В строку вписывается 3 числа через пробел, числа могут быть любыми. Нужно вытащить каждое из них и поместить отдельно в свою переменную.
допустим 3 переменные A B C , в строку ввели 5618765 1278436 23597697 , должен возвратить A=5618765 B=1278436 C=23597697
Я понимаю, что это довольно примитивно, но все-таки.

Ответить

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

Номер ответа: 1
Автор ответа:
 Ra$cal



ICQ: 8068014 

Вопросов: 18
Ответов: 817
 Web-сайт: www.rascalspb.narod.ru
 Профиль | | #1
Добавлено: 22.11.08 19:43
руками в цикле идет по символу до пробела, складывая в случае не пробела символ во временный буфер. нашли пробел - перевели временный буфер в число.
ну а цивилизованные люди юзают поиск в строке, разбивку строк, на выбор все, что дает класс строки.

Ответить

Номер ответа: 2
Автор ответа:
 Саня



ICQ: 444856908 

Вопросов: 1
Ответов: 2
 Web-сайт: crysis-club.clan.su
 Профиль | | #2
Добавлено: 22.11.08 20:11
я в VB относительно недолго, можете написать сам код ? ну допустим поиск по строке и добавление в переменные.

Ответить

Номер ответа: 3
Автор ответа:
 Ra$cal



ICQ: 8068014 

Вопросов: 18
Ответов: 817
 Web-сайт: www.rascalspb.narod.ru
 Профиль | | #3
Добавлено: 22.11.08 21:07
http://letmegooglethatforyou.com/?q=%D1%80%D0%B0%D0%B7%D0%B1%D0%BE%D1%80+%D1%81%D1%82%D1%80%D0%BE%D0%BA%D0%B8+%D0%B2+vb
вторая страница, внизу.

Ответить

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



Вопросов: 18
Ответов: 186
 Профиль | | #4 Добавлено: 22.11.08 21:55
Ra$cal, не пудри мозг =)
  1. Sub Spliter()
  2.   Const delim As String * 1 = " "
  3.   Dim theString As String
  4.   Dim theArray() As String
  5.   Dim A, B, C As Long
  6.  
  7.   theString = "5618765 1278436 23597697"
  8.   theArray = Split(theString, delim)
  9.   A = CLng(theArray(0))
  10.   B = CLng(theArray(1))
  11.   C = CLng(theArray(2))
  12. End Sub

Ответить

Номер ответа: 5
Автор ответа:
 Саня



ICQ: 444856908 

Вопросов: 1
Ответов: 2
 Web-сайт: crysis-club.clan.su
 Профиль | | #5
Добавлено: 23.11.08 16:22
NytrogenСпасибо большое !!!

Ответить

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



ICQ: 216390557 

Вопросов: 25
Ответов: 71
 Web-сайт: microsoft.com
 Профиль | | #6
Добавлено: 23.11.08 20:57
А встроенную в VB6 функцию Split забыли?

Ответить

Номер ответа: 7
Автор ответа:
 Boconon



ICQ: 216390557 

Вопросов: 25
Ответов: 71
 Web-сайт: microsoft.com
 Профиль | | #7
Добавлено: 23.11.08 20:58
Ой, протупил... :(.
Оказывается, не забыли.

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам