Private Sub Form_Load()
Me.Liste1.Form.RecordsetType = 2
End Sub
Private Sub Komut42_Click()
CurrentDb.Execute "delete * From Tablo1 where ((IDTablo1)=" & Me.Liste1.Form.Controls(0) & ")"
Me.liste1.Requery
End Sub
ile yapilabilir.
Son Düzenleme: 19/08/2015, 02:09, Düzenleyen: KulAhmet.