Вывести на экран слова, содержащие три буквы - VB
Формулировка задачи:
Дана строка, содержащая текст, заканчивающийся точкой. Вывести на экран слова, содержащие три буквы.
Строка "Сегодня для неё я буду тут проездом."
Решение задачи: «Вывести на экран слова, содержащие три буквы»
textual
Листинг программы
' возрашает строку str, в коротой символ src заменен на dst;Replace("корова","о","а")="карава" Function Replace(str As String, src As String, dst As String) As String End Function Sub www() Dim str, s str = "Сегодня для неё я буду тут проездом." For Each s In split(Replace(str, ".", ""), " ") 'For Each s In split(Replace(str, ".", "")) If Len(s) = 3 Then Debug.Print s End If Next s End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д