ВУЗ:
Составители:
Рубрика:
51
Del(i) = 0
Next i
End Sub
При выборе пункта меню «Файл Æ Открыть» появится диалоговое окно, в
котором пользователь может выбрать файл, который нужно открыть. Полное имя
файла будет записано в переменную Path модуля Declar и в том случае, если путь
существует, производится чтение из выбранного файла. Файл-справочник для
специальности имеет то же самое имя, что и
основной файл. Отличие состоит
только в расширениях этих файлов. Кроме этого, все пункты пользовательского
меню становятся доступными. Для того чтобы просмотреть содержимое файла ба-
зы данных, нужно в строке меню выбрать пункт меню «Просмотр» и в нем один
из возможных вариантов просмотра.
11.2. Просмотр файла базы данных
Файл базы данных можно
просмотреть, используя форму frmInputEdit. Для
этого необходимо написать еще одну пользовательскую процедуру для данной
формы (не забудьте для этого перейти в окно кода формы frmInputEdit). Это про-
цедура с именем View_Form, которая должна загрузить данные и вывести первую
запись в уже известном нам виде на форме frmInputEdit. Ниже приведен код этой
процедуры.
Public Sub view_form()
Dim R As TStud = New TStud()
' загрузка формы frmInputEdit
frmMenu.Enabled = False
Me.Enabled = True
Me.Show()
' загрузка Файла-справочника по специальности, выполнение
' пользовательской процедуры
Call LoadSprav()
' определение количества записей в основном файле базы
N = f1.Length \ R.len
Страницы
- « первая
- ‹ предыдущая
- …
- 49
- 50
- 51
- 52
- 53
- …
- следующая ›
- последняя »
