Подсчет слов в текстовом файле - VB
Формулировка задачи:
кaк пoдсчитaт скoлкo нaпример: слoв 'windows' встречaются в теxтoвoм фaиле пoд нaзвaнием 'data.тxт '
Решение задачи: «Подсчет слов в текстовом файле»
textual
Листинг программы
Dim txt As String Dim sword As String Dim atxt() As String txt='....' sword='....' atxt()=Split(txt,sword) MsgBox 'Количество слов ''' & sword & ''' в тексте равно ' & Str(UBound(atxt())
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д