Запись строк в файл - VB
Формулировка задачи:
Дан файл.Записать в другой файл только те строки,которые начинаются с заданной буквы.
Решение задачи: «Запись строк в файл»
textual
Листинг программы
Open "TESTFILE" For Input As #1 ' Закрывает файл перед повторным открытием в другом режиме. Close #1 Следующие инструкции открывают файл в режиме Binary только для записи. Open "TESTFILE" For Binary Access Write As #1 ' Закрывает файл перед повторным открытием в другом режиме. Close #1 Следующие инструкции открывают файл в режиме Random. Файл содержит записи определенного пользователем типа Record. Type Record ' Тип, определенный пользователем. ID As Integer Name As String * 20 End Type Dim MyRecord As Record ' Объявляет переменную. Open "TESTFILE" For Random As #1 Len = Len(MyRecord) ' Закрывает файл перед повторным открытием в другом режиме. Close #1 Следующие инструкции открывают файл для последовательного вывода; любой процесс может читать из этого файла или записывать в него. Open "TESTFILE" For Output Shared As #1 ' Закрывает файл перед повторным открытием в другом режиме. Close #1 Следующие инструкции открывают файл в режиме Binary для чтения; другие процессы не могут читать этот файл. Open "TESTFILE" For Binary Access Read Lock Read As #1
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д