Skip to main content

AccessTr.neT


Verilerin Otomatik Olarak Gelmesi

Verilerin Otomatik Olarak Gelmesi

#4
eklediğiniz açılan kutu nun olay yordamında güncelleştirme sonrasına ekteki kodu yazmalısınz
Private Sub Açılan_Kutu11_AfterUpdate()
' Denetime uyan kaydı bul.
Dim rs As Object

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

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Verilerin Otomatik Olarak Gelmesi - Yazar: konak - 05/10/2015, 10:49
Cvp: Verilerin Otomatik Olarak Gelmesi - Yazar: konak - 05/10/2015, 11:18
Cvp: Verilerin Otomatik Olarak Gelmesi - Yazar: simendifer - 05/10/2015, 11:42
Cvp: Verilerin Otomatik Olarak Gelmesi - Yazar: konak - 05/10/2015, 11:47
Cvp: Verilerin Otomatik Olarak Gelmesi - Yazar: konak - 05/10/2015, 12:00
Cvp: Verilerin Otomatik Olarak Gelmesi - Yazar: konak - 05/10/2015, 12:31
Cvp: Verilerin Otomatik Olarak Gelmesi - Yazar: konak - 05/10/2015, 12:36
Cvp: Verilerin Otomatik Olarak Gelmesi - Yazar: konak - 05/10/2015, 13:20
Cvp: Verilerin Otomatik Olarak Gelmesi - Yazar: konak - 05/10/2015, 13:47
Cvp: Verilerin Otomatik Olarak Gelmesi - Yazar: konak - 06/10/2015, 08:04
Cvp: Verilerin Otomatik Olarak Gelmesi - Yazar: atoz112 - 06/10/2015, 16:32
Task