Использование средств Visual Basic .NET в создании информационных систем - 54 стр.

UptoLike

54
' чтение очередной записи и загрузка ее полей
' в таблицу
For i = 1 To N
R.ReadFromFile(f1, Ind(i))
' чтение специальности по ее коду
j = frmInputEdit.FindSpecIndex(R.Spec)
sp.ReadFromFile(F1_sp, j)
' загрузка новой строки в таблицу
Dim row As String() = New String() _
{CStr(i), R.Kurs, R.Group, _
Trim(sp.Number) + " - " + Trim(sp.Name), Trim(R.FIO), _
R.Pol, R.Kol, R.M(0), R.M(1), R.M(2), R.M(3), R.M(4)}
.Rows.Add(row)
Next i
End With
' изменение заголовка формы
frmTableReadOnly.Text = "Просмотр файла: " + Decl.Path
' загрузка формы frmTableReadOnly
frmTableReadOnly.Show()
End Sub
На этом месте рекомендуется протестировать создаваемый проект. Особое
внимание следует уделить корректности чтения записей из файла и вывода их
в таблицу и элементы формы.
11.3. Изменение и удаление записей в файле базы данных
Эти действия предусмотрены в форме для ввода и редактирования (форма
frmInputEdit) и для их выполнения используются кнопки «Изменить» (cmdEdit) и
«Обновить» (cmdPack).
Для корректировки содержимого полей текущей записи используется кноп-
ка «Изменить». Отредактировав нужные поля некоторой записи, нажимаем кноп-
ку «Изменить» и все изменения
для текущей записи вносятся в базу данных. Об-
работка события нажатия на кнопку «Изменить»:
Private Sub cmdEdit_Click(ByVal sender As System.Object, _