Напечатать буквы, с которых начинаются слова в заданном тексте. Слова разделены пробелом - VB
Формулировка задачи:
16. Напечатать буквы, с которых начинаются слова в заданном тексте. Слова разделены пробелом.текст задается пользователем
Решение задачи: «Напечатать буквы, с которых начинаются слова в заданном тексте. Слова разделены пробелом»
textual
Листинг программы
Sub zxc()
For Each w In Split(InputBox("Введите текст", , "Напечатать буквы, с которых начинаются слова в заданном тексте. Слова разделены пробелом.текст задается пользователем"))
Debug.Print Left(w, 1)
Next
End Sub