Студопедия
rus | ua | other

Home Random lecture






А. Последовательный доступ: запись в файл в одну строку, в несколько строк


Date: 2015-10-07; view: 374.


Практическая работа 19. Работа с файлами: запись данных в файл, чтение из файла

Двоичный (Binary) доступ

Двоичный доступ в отличие от произвольного возможен не к определeнному набору данных, а к отдельному байту.

Приводятся примеры работы с файлами, пояснения даны под комментариями к коду. Создать требуемые элементы управления, ввести код, данный ниже, см. также (схема формы) и

 


Рис. 3.3.Схема формы

Задание: создать несколько переменных типа String, вывести их значения в поле списка и значения записать в файл.

Dim a1 As String, a2 As String, a3 As String, a4 As StringDim a5 As String, a6 As String, d1 As IntegerDim j As Integer, mass(6) As String, nomZ As IntegerDim b1 As String, b2 As String, b3 As String, b4 As String Private Sub Form_Load()' присвоить значения переменным и вывести в поле List1a1 = "a": a2 = "b": a3 = "c": a4 = "d" List1.List(0) = a1: List1.List(1) = a2List1.List(2) = a3: List1.List(3) = a4End Sub Private Sub Command1_Click() ' запись в файл' открыть файл для записи; файл можно просмотреть в ' приложении "Блокнот"Open "file11.txt" For Output As #1Write #1, "Name", a1, a2, a3, a4 ' запись в файлClose #1 ' закрыть файлEnd Sub Private Sub Command2_Click() ' запись в файлOpen "file22.txt" For Output As #1' запись в файл строки и данных из поля списка в 4 ' строки (записи)Write #1, "Name"For j = 0 To 3Write #1, List1.List(j)Next jClose #1End Sub


Рис. 3.4.Работа с файлами


<== previous lecture | next lecture ==>
Произвольный (Random) доступ | С. Доступ Random: запись, чтение
lektsiopedia.org - 2013 год. | Page generation: 0.094 s.