Преобразовать все прописные латинские буквы в строчные, а цифры заменить символом "?" - VB

Узнай цену своей работы

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

1. Создать проект, который позволяет преобразовать все прописные латинские буквы в строчные, а цифры заменить символом ?. 2. Дана строка, состоящая из русских слов, разделенных одним пробелом. Определить количество слов, которые содержат ровно три буквы «А».
Создать проект, который
Тема не может и не должна так называться

Решение задачи: «Преобразовать все прописные латинские буквы в строчные, а цифры заменить символом "?"»

textual
Листинг программы
Sub ТриА()
s = InputBox("Введите текст", "ПРОЕКТ")
a = Split(s)
For i = 0 To UBound(a)
  c = c - ((Len(a(i)) - Len(Replace(a(i), "А", "", , , vbTextCompare))) = 3)
Next
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

7   голосов , оценка 4 из 5
Похожие ответы