- •Лабораторная работа n 1 Знакомство со средой разработки Visual Basic
- •Лабораторная работа n 2 Знакомство со средой разработки Visual Basic
- •Лабораторная работа n 3 Ввод и вывод данных
- •Вопрос 32,
- •Лабораторная работа n 4. Константы и переменные. Оператор присваивания. Типы данных. Диапазон действия переменных и констант.
- •Лабораторная работа n 5. Стандартные функции vb. Операции. Выражения.
- •Лабораторная работа n 6 Логический тип данных. Операторы выбора. Оператор перехода.
- •Оператор множественного выбора
- •Оператор перехода
- •Лабораторная работа n 7. Циклы
- •Лабораторная работа n 8. Массивы
- •Лабораторная работа n 9. Процедуры и функции
- •Лабораторная работа n 10.
- •Фокус ввода.
- •Обработка событий, связанных с клавиатурой и мышью
- •Технология drag -and-drop.
- •Лабораторная работа n 11. Структуры. Файлы.
- •Последовательные файлы
- •Файлы произвольного (прямого) доступа.
- •Практическое занятие
- •Практическое занятие
- •Лабораторная работа n 12 Программирование графики
- •Практическое занятие
- •Лабораторная работа n 13 Разработка пользовательских объектов Практическое занятие
- •Лабораторная работа n 13 Классы.
Практическое занятие
Задание 1. Создать последовательный файл, содержащий следующие сведения о сотрудниках ООО “ЫЫЫ”: <фамилия, инициалы> <год рождения> <адрес>.
Предусмотреть пополнение списка сотрудников.
Вывести содержимое файла в три массива, содержащих соответственно: фамилию и инициалы, год рождения, адрес. Найти средний возраст сотрудников.
Осуществить поиск сведений о сотруднике по его фамилии. Предусмотреть два варианта поиска:
фамилия вводится непосредственно в текстовое поле ComboBox,
фамилия выбирается из комбинированного списка.
Доступ к текстовому полю элемента ComboBox осуществляется с помощью свойства Text этого элемента
Задание 2. Создать тип данных структура для представления информации о сотрудниках ООО “ЫЫЫ”, добавив поле <порядковый номер>.
Создать файл прямого доступа для записи вводимых данных.
Отобразить в первом списке данные о трех сотрудниках, начиная с заданного номера.
Осуществить редактирование данных о сотруднике с заданным номером.
Отобразить во втором списке данные о трех сотрудниках, кончая заданным номером.
Найти самого молодого сотрудника.
Задание 3. Создать на рабочем столе текстовый файл. Проверить наличие этого файла с искаженным именем, найти его с помощью окна OpenFileDialog. Отредактировать файл и скопировать в папку Projects на диск C. Предусмотреть два варианта сообщения в зависимости от того, с какой целью он открывается: для записи или для чтения.
Запись в файл прямого доступа происходит с помощью оператора
FilePut(<номер файла>,<>)
При записи данных в файл и считывании их из файла будет
Даже при создании числового файла данные оформляются, как записи, например
Type MyInteger
Int As Integer
End Type
Для работы с файлом прямого доступа его нужно открыть оператором Open.
Open <имя файла> For Random As #<номер файла> Len = <длина записи>
Имя и номер файла имеют тот же смысл, что и при работе с последовательными файлами. Ключевое слово Random указывает на то, что открываемый файл будет использован в режиме прямого доступа. Длина записи – это числовое выражение целого типа. Его значение должно совпадать с длиной переменной пользовательского типа, используемой для чтения информации из файла. Для определения длины записи можно использовать функцию Len, например,
Reclen = Len(Client1)
Для вывода информации в файл прямого доступа используется оператор Put, который указывает не только в какой файл и какую информацию писать, но и в какое место писать эту информацию:
Put #<номер файла>,[<номер записи>],<переменная>
номер записи указывает место в файле, где будет помещена запись, если оно не указано, то текущая запись будет помещена после последней записанной записи,
переменная – переменная пользовательского типа, используемая для записи, к моменту записи в файл все компоненты этой переменной должны получить соответствующие значения.
Для чтения информации из файла прямого доступа используется оператор Get:
Get #<номер файла>,[<номер записи>],<переменная>
номер записи указывает место в файле, где находится считываемая запись, если оно не указано, то будет читаться очередная запись.
Рассмотрим основные операции с файлами.
Переименование файла – Name<старое имя> As <новое имя>
Копирование файла – File Copy <имя первого файла>, <имя второго файла>
Удаление файла –Kill<имя файла>.
Имя файла в этих операторах представляет путь к файлу.