Программа для подсчета слов во введенном тексте - VB

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

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

Листинг программы
  1. Private sub command1_click()
  2. Dim x as string
  3. X=text1.text
  4. Print Len (x)
  5. End sub
Программа считает все введенное Как сделать чтобы подсчитывали слова помогите пожалуйста А то плохо разбираюсь

Решение задачи: «Программа для подсчета слов во введенном тексте»

textual
Листинг программы
  1. Private Sub Command1_Click()
  2. Dim n, a
  3. For Each a In Split("Мама мыла морду мылом")
  4.  n = n - (a Like "*[А-Яа-яЁё]*")
  5. Next
  6. MsgBox n
  7. End
  8. End Sub

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


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

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

10   голосов , оценка 4.2 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы