End Sub. CommonDialog1.ShowSave

End Sub

End If

Close

CommonDialog1.ShowSave

End Sub

End If

Close

CommonDialog1.ShowOpen

Option Explicit

Dim txtFileName$ 'Имя файла

Dim FileText$ 'Содержимое файла

Dim FileRecords% 'Количество символов в файле

'Процедура считывания текстового файла в текстовое поле

Private Sub Command1_Click()

'Вызов окна открытия файла

'Запись пути и имени файла в переменную

txtFileName = CommonDialog1.FileName

'Проверка содержимого переменной

If txtFileName <> "" Then

'Открытие файла для считывания данных

Open txtFileName For Input As #1

'Определение и запись в переменную кол-ва символов в файле

FileRecords = FileLen(txtFileName)

'Считывание содержимого файла в переменную

FileText = Input(FileRecords, #1)

'Запись содержимого файла в текстовое поле

Text1.Text = FileText

'Закрытие файла

'Процедура записи содержимого текстового поля в файл

Private Sub Command2_Click()

'Вызов окна сохранения файла

'Запись пути и имени файла в переменную

txtFileName = CommonDialog1.FileName

'Проверка содержимого переменной

If txtFileName <> "" Then

'Открытие файла для сохранения данных

Open txtFileName For Output As #1

'Запись текстового поля в переменную

FileText = Text1.Text

'Запись переменной в файл

Print #1, FileText

'Закрытие файла

Private Sub Command3_Click()

Text1.Text = ""

Сохраните проект. Выполните компиляцию. Закройте Visual Basic.

Загрузите исполняемый файл проекта.

Откройте текстовый файл fl.txt. Отредактируйте его и сохраните.

Убедитесь в том, что все изменения, внесённые в файл, сохранились.

Вопросы для самоконтроля

1. Какие элементы управления используются для ввода информации?

2. Приведите пример программного кода для ввода текстовой информации.

3. Какие функции используются для преобразования текстовой информации в цифровую и наоборот?

4. Приведите пример программного кода записи цифровой информации в текстовое поле.

5. Основные приёмы работы с файлами последовательного доступа.

6. Какие операторы используются для открытия и закрытия текстовых файлов?

1. ТИПЫ ПРОЕКТОВ

Основу проекта Visual Basic составляет форма. Она является контейнером для элементов управления, которые размещаются на ней. Сохраняется форма в отдельном файле, что позволяет её использовать в других проектах.

Приложение может состоять из нескольких форм. При этом подчинённые формы могут быть вызваны из основной. Различают простые и модальные формы. При обращении к простой форме используется метод Show. Одновременно можно загрузить несколько простых форм. При загрузке модальной формы работа всех остальных компонентов проекта блокируется до тех пор, пока модальная форма не будет закрыта. Для вызова модальной формы используется метод ShowvbModal.

Создание проекта, как правило, начинается с проектирования интерфейса. Интерфейс должен обеспечивать комфортные условия для работы пользователя, формы должны быть оптимально загружены элементами управления. В программировании на Visual Basic используют два вида интерфейсов.

Однодокументный интерфейс SDI (Single – Document Interface) – работа с одним документом в одном окне. Примером такого приложения может служить MS WordPad.

Многодокументный интерфейс MDI (Multiple – Document Interface) – работа в одной форме с любым количеством окон.

Дата добавления: 2014-12-27