Създаване на база данни от нулата

Всичко! Сега започване на проекта и да се провери.

Знам, че не искате да виждате на форма, която окаян компонент "Данни", защото искате бутоните за управление на базата данни или снимки?!

Поставете форма четири повече бутони: "btnFirts", в "Надпис" - "първи"; "BtnLast" - "End"; "BtnPrev" - "Назад" и "btnNext" - "Next". Направете кликнете два пъти върху "Старт" и въведете "data1.recordset.moveFirst", кликнете два пъти върху "Край" и въведете "data1.recordset.movelast", кликнете два пъти върху "Напред" и въведете "data1.recordset.moveprevious" и кликнете два пъти върху "Напред" и кода се въвежда "data1.recordset.movenext".
Всичко! Проверете.
Знам, знам, че когато сте обръщане чрез бутони база, достигайки последния запис задейства бъг с "3021" номер - това означава, че базата данни не повече записи. Основния има голям манипулатор грешка! Например:
Частни Под btnNext_Click ()
"Това пише" On Error Resume Next "и грешката няма да уволня!
"Но това е по-добре да го направите:
Ако не Data1.Recordset.EOF Тогава
Data1.Recordset.MoveNext
още
Data1.Recordset.MovePrevious
Крайна сметка, ако
End Sub
Той ни е дал, че ако е стигнал края на базата данни, тогава ще трябва да се премести в предишния рекорд и няма да бъде грешка. Същото може да се направи с всички бутони.

Всичко! Честито! Ти си направил една система от база данни и управление за него!
Беляев Данила