Автор Тема: Как проверить первую букву каждого слова из текста  (Прочитано 186 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн egorik105 [?]

  • Новичок
  • *
  • Сообщений: 1
  • Репутация: 0
  • Пол: Мужской
    • Награды
  • Версия AutoIt: 3.3.14.0
У меня есть текст:
$test ="1333рвовлвл 4лалвлоаов огж АБС ГУР АБС асл"
Нужно что бы скрипт проверил есть ли в этом тесте слова начинающиеся на А(без учёта регистра)

Русское сообщество AutoIt


Оффлайн Alofa [?]

  • AutoIt Гуру
  • *****
  • Сообщений: 1420
  • Репутация: 207
  • Пол: Мужской
  • Windows 7 /10 [x64]
    • Награды
  • Версия AutoIt: 3.3.12.0
... есть ли в этом тесте слова ...
А что есть слово?
"А=пр", "А4а", "а", "_Аввв" - это слова?

Оффлайн gunter123 [?]

  • Осваивающий
  • **
  • Сообщений: 109
  • Репутация: 40
  • Пол: Мужской
    • Награды
  • Версия AutoIt: 3.3.14.0
Код: AutoIt [Выделить]
$sTest = "1333рвовлвл 4лалвлоаов огж АБС ГУР АБС асл"
$sSymbol = 'а'

If StringRegExp(' ' & $sTest, '(?i)[^A-zА-я](' & $sSymbol & ')', 0) Then         ; "РВО" - найдет, "с" - Нет
   MsgBox(4096, "", "Есть")
Else
   MsgBox(4096, "", "Нет")
EndIf

Is it future or is it past?

Оффлайн alex33 [?]

  • AutoIt Гуру
  • *****
  • Сообщений: 1419
  • Репутация: 177
  • Пол: Мужской
    • alekssamos ВКонтакте
    • Награды
  • Версия AutoIt: 3.3.12.0
Код: AutoIt [Выделить]
$test ="1333рвовлвл 4лалвлоаов огж АБС ГУР АБС асл"
$sSymbol = 'а'

$aWords = StringSplit($test, ' ')

For $i = 1 To $aWords[0]
    If StringLeft($aWords[$i], StringLen($sSymbol)) = $sSymbol Then
        MsgBox(0, "", "есть" & @CRLF & $aWords[$i])
    Else
        MsgBox(0, "", "нет" & @CRLF & $aWords[$i])
    EndIf
Next

$bFlag = True
For $i = 1 To $aWords[0]
    If StringLeft($aWords[$i], StringLen($sSymbol)) <> $sSymbol Then
        $bFlag = False
        ExitLoop
    EndIf
Next
If $bFlag Then
    MsgBox(0, "", "есть во всех")
Else
    MsgBox(0, "", "Нет хотя бы в одном")
EndIf
 


Русское сообщество AutoIt

Re: Как проверить первую букву каждого слова из текста
« Ответ #3 Отправлен: Июль 12, 2018, 09:23:54 »

 

Похожие темы

  Тема / Автор Ответов Последний ответ
14 Ответов
6307 Просмотров
Последний ответ Март 08, 2011, 20:18:03
от k790
1 Ответов
3162 Просмотров
Последний ответ Март 29, 2011, 14:24:13
от Yashied
2 Ответов
7381 Просмотров
Последний ответ Август 22, 2011, 00:03:54
от agikon
8 Ответов
3625 Просмотров
Последний ответ Август 23, 2011, 17:48:01
от Kaster
7 Ответов
2684 Просмотров
Последний ответ Февраль 10, 2012, 09:05:57
от winstan
8 Ответов
5276 Просмотров
Последний ответ Февраль 16, 2013, 02:18:38
от CreatoR
0 Ответов
1019 Просмотров
Последний ответ Январь 20, 2014, 16:02:51
от madmasles
5 Ответов
2213 Просмотров
Последний ответ Апрель 11, 2014, 18:00:54
от Ivanov
2 Ответов
1075 Просмотров
Последний ответ Июль 17, 2015, 22:49:29
от ssdd
2 Ответов
850 Просмотров
Последний ответ Сентябрь 02, 2016, 22:45:36
от Alofa