(01-10-2022, 00:36)adnnfrm demiş ki: Merhaba Arkadaşlar;


Formda kayıtlar arası gezinti işleminin sadece arama listbox u üzerinden yapılmasını istiyorum. End, home, pageup, pagedown gibi tüm kayıt gezintisinde kullanılabilecek tuşlarla gezinti yapılmasın istiyorum. Ama bu tuşları form içinde bir textbox içinde kullanılabilir. Örneğin veir satırının sonuna gitmek için end tuşuna basılması gerekebilir. Burada kullanılsın ama kayıt gezintisinde kullanılmasın istiyorum, nasıl yapabilirim.

Saygılarımla

Dim db As DAO.Database
Dim rst As DAO.Recordset
Set db = CurrentDb
Set rst = db.OpenRecordset("TabloAdı" , dbOpenDynaset
 
With rst
.FindFirst "CategoryName = " & "'better software'" 
If .NoMatch Then 
 
 
End If 
End With
 
Set rst = Nothing
db.Close
Set db = Nothing