Vb.Net bilgim yok ama genelde mantık aynı aşağıdaki kod size fikir vercektir.Ben burada tarihe göre arama yaptırdım.
Kod:
Private Sub Form_Load()
Adodc2.ConnectionString = "Provider=Microsoft.Jet.Oledb.4.0; Data Source=" & App.Path & "\Hatirlatma.mdb"
Adodc2.CommandType = adCmdText
Adodc2.RecordSource = "select * from Hatirlatma ORDER BY ID"
Adodc2.Refresh
If Adodc2.Recordset.RecordCount <> 0 Then
End If
Set VSFlexGrid1.DataSource = Adodc2
DTPTarih.D_Value = Date
End Sub
Private Sub cmdbul_Click()
Adodc2.Refresh
Dim bul As String
bul = DTPTarih.D_Value
If Trim(bul) <> "" Then
bul = "Tarih='" + bul + "'"
Adodc2.Recordset.MoveFirst
Adodc2.Recordset.Find bul
Call VeriSet
End If
End Sub
Private Sub VeriSet()
txtid = Adodc2.Recordset.Fields(0)
DTPTarih.D_Value = Adodc2.Recordset.Fields(1)
txtNot = Adodc2.Recordset.Fields(2)
End Sub