Напечатать в алфавитном порядке все слова длиной n из данного файла - VB
Формулировка задачи:
Помогите пожалуйста решить задачу на языке Visual Basic 6.0 : Дан текстовый файл. Напечатать в алфавитном порядке все слова из данного файла, имеющая численную длину n
Решение задачи: «Напечатать в алфавитном порядке все слова длиной n из данного файла»
textual
Листинг программы
Dim File As String, CF As String 'объявим пеpеменнyю для имени файла и его cодеpжимого File = "d:\ca.log" 'ycтановим имя файла и пyть Open File For Binary As #1 'откpоем файл для чтения CF = Input(FileLen(File), 1) 'загpyзить в пеpеменyю CF вcе cодеpжимое файла Close #1 'закpыть файл
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д