Создание базы данных "Студент": как добавлять, удалять и редактировать записи - VB

Формулировка задачи:

Привет всем, нужна помощь в написании программки, которая использует базу данных... с созданием базы данных в visual basic я разобрался... а вот теперь подключить и добавить кнопки с добавлением новой записи, редактированием, удалением, поиском по базе данных...

Private Sub btnNew_Click()
Data1.Recordset.AddNew
End Sub
 
Private Sub btnDel_Click()
With Data1.Recordset
.Delete
.MoveNext
If .EOF Then .MoveLast    'когда удаляю все записи из БД, он мне выкидывает ошибку на эту строку, и не выводит то что база данных пуста'
If .BOF Then MsgBox "База данных пуста!"
End With
End Sub
 
Private Sub btnSearch_Click()
Data1.Recordset.FindFirst "database = '" _  'когда выходит поле с вводом имени, ввожу имя, жму ок, и выкидывает сюда'
& Trim(InputBox("Введите имя:")) & "'"
If Data1.Recordset.NoMatch Then MsgBox "Имя не найдено"
End Sub

Код к задаче: «Создание базы данных "Студент": как добавлять, удалять и редактировать записи - VB»

With Data1.Recordset
If .RecordCount = 0 Then
Exit Sub
Else
.Delete
.MoveNext
End With

Полезно ли:

6 голосов, оценка 4.167 из 5

СОХРАНИТЬ ССЫЛКУ