Skip to main content

AccessTr.neT


Etiketler
Yazar: deliyurek1905 - Cevaplar: 4 - İzleme: 2198
Açılan_Kutu1_AfterUpdate
Private Sub Açılan_Kutu1_AfterUpdate()
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[Id] = " & Str(Nz(Me![Açılan Kutu1], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub


merhabalar bu kod bölümü ne işe yarar biraz açıklanmısınız. Bunu yazmadan da işlemimi yapabiliyorum.