Составление условия с If и открытие формы для редактирования найденной записи - VB

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

Хочу присобачить кнопку поиска, она работает, когда в поиск ввожу не существующую запись, то выводится сообщение, о том что записи нет, помогите сделать условие, чтобы она найденную запись выделяла или открывала в другой форме редактирования...
Private Sub btnFind_Click()
Student.Recordset.FindFirst "FIO = '" _
& Trim(InputBox("введите")) & "'"
If Student.Recordset.NoMatch Then MsgBox "не найдено"
End Sub
А это кнопка редактирования, которая открывается в другой форме... вот помогите привязать её к кнопке поиска, если запись найдена...
Private Sub btnEdit_Click()
frmUsers.Student.Recordset.FindFirst "FIO = '" & lstList.Text & "'"
Load frmUsers
frmUsers.Show
Unload Me
End Sub

Код к задаче: «Составление условия с If и открытие формы для редактирования найденной записи - VB»

textual
SELECT * FROM WHERE
 
IF .RECORDSET.RECORDCOUN = 0 THEN EXIT SUB
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.

9   голосов, оценка 4.222 из 5


СДЕЛАЙТЕ РЕПОСТ