Найти все слова, в которых буква "а" встречается более чем один раз - VB

Формулировка задачи:

Помогите решить задачу.
Дана строка, состоящая из слов, разделенных любым количеством пробелов. Напишите программу, которая находит все слова, в которых буква ”а” встречается более чем один раз.
Очень прошу. Заранее спасибо.)

Код к задаче: «Найти все слова, в которых буква "а" встречается более чем один раз - VB»

textual
temp = Split(Replace(Replace(st, ".", " "), ",", " "))
    For i = 0 To UBound(temp)
        If UBound(Split(temp(i), letter)) >= 2 Then res = res & temp(i) & vbCrLf
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.

15   голосов, оценка 3.933 из 5


СДЕЛАЙТЕ РЕПОСТ