17039

Використання файлів: довільний доступ у VB 6.0

Лабораторная работа

Информатика, кибернетика и программирование

Лабораторна робота № 17 Тема: Використання файлів: довільний доступ. Мета: Ознайомитися з принципами організації роботи з файлами у довільному доступі і використання файлових функцій у VB 6.0. Обладнання: ПК ПЗ VB 6.0 Завдання: Відкрити файл для довільного дос

Украинкский

2013-06-29

121 KB

2 чел.

Лабораторна робота № 17

Тема: Використання файлів: довільний доступ.

Мета: Ознайомитися з принципами організації роботи з файлами у довільному доступі і  використання файлових функцій у VB 6.0.

Обладнання: ПК, ПЗ VB 6.0

Завдання:

  1.  Відкрити файл для довільного доступу.
  2.  Додати три записи файл (ім'я, прізвище, група) за допомогою оператора Put #, викликуваних функцією InputBox.
  3.  Другий запис вважайте в перемінну,  а потім у вікні повідомлень виведемо значення прізвище.

Листинг

Программа

Private Sub Command1_Click()

Dim name As String, surname As String, group As String, nf As String

nf = FreeFile()

Open "d:\17.txt" For Random As nf

name = InputBox("Введите свое имя")

surname = InputBox("Введите свою фамилию")

group = InputBox("Введите название своей группы")

Put #nf, 1, name

Put #nf, 2, surname

Put #nf, 3, group

Get #nf, 2, surname

MsgBox ("Ваша фамилия - " & surname)

End Sub

Проверка файла

Контрольні питання:

  1.  Що таке послідовний доступ?
  2.  Використання функції FreeFile.
  3.  Використання операторів: Open, Close, Print # , Get#, Put# , Write #, Line Input # .
  4.  Параметр mode, як режим доступу.


 

А также другие работы, которые могут Вас заинтересовать

56440. The City 42.5 KB
  Now you can see that the title of topic is “City” Today at our lesson we’ll be travel agency. Imagine yourself travel agents indefinite routes. We are expecting a tourist, who whoud like to visit Ukrainian cities and interesting places. Your task is to give him this information.
56441. История древнего мира. Древняя Месопотамия 82.5 KB
  В древней Месопотамии существовали крупные города-государства со сложным управлением, развитыми ремеслами, искусствами и торговыми связями. Это делало регион нестабильным, поскольку их правители враждовали за земли, торговые пути и влияние
56442. Профессия: Электромонтёр по ремонту и обслуживанию электрооборудования 497 KB
  Естественное освещение, являясь с физиологической точки зрения наиболее благоприятным для человека, не может полностью обеспечить его нормальную жизнедеятельность, поэтому еще в доисторические времена у людей возникла потребность в искусственном освещении.
56443. Тіла Обертання. Об’єм тіл обертання.. Розв’язування задач 2.9 MB
  Систематизувати й узагальнити знання з теми; відпрацювати навички розв’язування задач; розвивати логічне мислення, уміння аналізувати, просторову уяву,самостійність; виховувати інтерес до предмета.
56446. Запалюємо «Тимурівські зірочки» 318.5 KB
  Наш проект Запалюємо Тимурівські зірочки передбачає відродження саме тимурівського руху як самостійного напрямку діяльності учнів. Мета проекту: відродження тимурівського руху як самостійного напрямку діяльності.
56447. Типы и структура урока технологии 31 KB
  По этим признакам выделяются: комбинированный урок теоретический урок практический урок уроклабораторная работа урок по решению технических задач контрольнопроверочный урок. Типы уроков технологии отличаются друг от друга своей структурой. Под этим понимается совокупность элементов входящих в урок их последовательность и взаимосвязь.
56448. Типы и структура уроков русского языка 40.5 KB
  В уроке реализуется и программа, и вся методика, осуществляется процесс обучения: деятельность ученика как субъекта учебного процесса и учителя, управляющего этим процессом. Общие требования к уроку русского языка...