Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - .NET

Страница: 1 |

 

  Вопрос: найти в строке, все однобуквенные слова... Добавлено: 20.04.10 20:52  

Автор вопроса:  Azul
Подскажите, пожалуйста, как найти в строке, все однобуквенные слова. Вывести сами слова и их колличество...

Ответить

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

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



ICQ: 345685652 

Вопросов: 96
Ответов: 1212
 Web-сайт: xawp.narod.ru
 Профиль | | #1
Добавлено: 20.04.10 20:58
Ну смотришь, чтобы вокруг буквы со двух сторон не было букаф.
считаешь сколько таких.

Ответить

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



Администратор

ICQ: 278109632 

Вопросов: 42
Ответов: 3949
 Web-сайт: domkratt.com
 Профиль | | #2
Добавлено: 20.04.10 23:42
  1. a=Split(mystring, " ")
  2. for i=0 to ubound(a)
  3.     if len(a)=1 then
  4.         print a(i)
  5.         counter=counter+1
  6.     end if
  7. next
  8. print counter

Ответить

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



ICQ: 345685652 

Вопросов: 96
Ответов: 1212
 Web-сайт: xawp.narod.ru
 Профиль | | #3
Добавлено: 20.04.10 23:55
Ну всегда между словами одни пробелы стоят.

Ответить

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



Администратор

ICQ: 278109632 

Вопросов: 42
Ответов: 3949
 Web-сайт: domkratt.com
 Профиль | | #4
Добавлено: 21.04.10 00:10
ах да, прошу прощения. после работы уже не соображаю... только пришел.

Ответить

Номер ответа: 5
Автор ответа:
 VβÐUηìt



Вопросов: 246
Ответов: 3333
 Web-сайт: смекаешь.рф
 Профиль | | #5
Добавлено: 21.04.10 10:12
  1. Debug.Print (List<string> l = c.Split(' ', ',', '.', '!', '?', '(', ')', '%', '^', '-', StringSplitOptions.RemoveEmptyEntries).ToList().FindAll(a => a.Length == 1).Count);

Ответить

Страница: 1 |

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



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