Visual Basic 6. Руководство разработчика


         

Методы элемента управления - часть 2


Программа 17.1. Кнопки First и Last

Private Sub FirstBttn_Click ()

Data1.Recordset MoveFirst

End Sub

Private Sub LastBttn Click()

Data1.Recordset.MoveLast

End Sub

Код для двух других кнопок немного сложнее, поскольку он написан с учетом свойства

EOF элемента управления.

Программа 17.2. Обработка щелчка на кнопке Next

Private Sub NextBttn_Click()

Data1.Recordset.MoveNext

If Data1.Recordset.EOF Then

MsgBox "You are on the last record"

'(Вы находитесь на последней записи)

           Data1.Recordset.MoveLast

End  If

End Sub

Программа перемещается на следующую запись, а затем проверяет свойство EOF. Если EOF равно True, то элемент управления Data переместился на запись, располо­женную за последней. Программа отображает сообщение, что достигнута последняя запись, и затем возвращается на нее.

Примечание

Переход на запись, находящуюся за последней, допустим. Это пустая запись, которую можно отредактировать и добавить к таблице. Проблема возникнет, если снова щелкнуть на кнопке Next. Попытка переместиться далее вызовет ошибку исполнения программы. Именно поэтому необходимо обработать эту ситуацию сразу, если выполняется условие EOF = True. Заметьте: когда отображается сообщение, поля пусты. Обычно необходимо выдавать сообщение при перемещении на последнюю запись. Данный же пример показывает, что после последней записи в RecordSet действительно имеется пустая запись.

Код для кнопки Previous такой же. Он вызывает метод MovePrevious, а вместо свойства EOF проверяет свойство BOF элемента управления Data.

Программа 17.3. Кнопка Previous

Private Sub PreviousBttn_Click()

Data1.Recordset.MovePrevious

If Data1.Recordset.BOF Then

MsgBox "You are on the first record"

'(Вы находитесь на первой записи)

Data1.Recordset.MoveFirst

End If

End Sub

Методы поиска записей

В дополнение к методам перемещения элемент управления Data предоставляет четыре метода для поиска записей в RecordSet. Одна из основных операций, которые выполняются над базами данных — нахождение требуемых записей. Следующие методы осуществляют нахождение записей, удовлетворяющих заданным критериям.




Содержание  Назад  Вперед