ВУЗ:
Составители:
Рубрика:
25
If Not (F1_sp Is Nothing) Then F1_sp.Close()
If Not (F2 Is Nothing) Then F2.Close()
If Not (F3 Is Nothing) Then F3.Close()
End Sub
End Module
End Namespace
После описания пользовательского модуля Declar необходимо изменить
функцию обработки события выбора пункта меню «Выход». Измененная функция
имеет вид:
Private Sub mnuFileExitItem_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles mnuFileExitItem.Click
If (vbYes =MsgBox("Действительно хотите выйти?",vbYesNo)) Then
Decl.CloseAllFiles()
End
End If
End Sub
9. Работа с файлами
9.1. Использование диалогового окна Windows
Для открытия и сохранения файлов в проекте используется стандартное
диалоговое окно Windows, которое создается с использованием элементов управ-
ления соответственно OpenFileDialog и SaveFileDialog. Нанесем на главную фор-
му с меню (frmMenu) объекты для работы с диалоговыми окнами для открытия и
сохранения файлов, можно оставить им те имена, которые им присвоит система
(OpenFileDialog1 и SaveFileDialog1), а можем
дать другие имена. Заметим, что во
время выполнения приложения данные элементы управления не видны.
Окна диалога имеют определенные свойства и методы. Используемые нами
в данной реализации свойства и методы для обоих типов объектов совершенно
одинаковы, поэтому остановимся на свойствах только одного элемента управле-
ния при пояснении кодов процедур обработки событий для
открытия и сохране-
Страницы
- « первая
- ‹ предыдущая
- …
- 23
- 24
- 25
- 26
- 27
- …
- следующая ›
- последняя »